[реклама вместо картинки] #!/usr/bin/perl # ### PRIMARY UBB SCRIPT ## # # Ultimate Bulletin Board is copyright Infopop Corporation, 1998-2000. # # ------------ Ultimate.cgi ------------- # # This file contains intro functionality for the UBB. # # Infopop Corporation offers no # warranties on this script. The owner/licensee of the script is # solely responsible for any problems caused by installation of # the script or use of the script, including messages that may be # posted on the BB. # # All copyright notices regarding the Ultimate Bulletin Board # must remain intact on the scripts and in the HTML # for the scripts. # # For more info on the Ultimate BB, # see https://www.UltimateBB.com # ############################################################### # #If you are running UBB on IIS, #you may need to add the following line #if so, just remove the "#" sign before the print line below #print "HTTP/1.0 200 OK\n"; eval { ($0 =~ m,(.*)/[^/]+,) && unshift (@INC, "$1"); # Get the script location: UNIX / or Windows / ($0 =~ m,(.*)\\[^\\]+,) && unshift (@INC, "$1"); # Get the script location: Windows \ #substitute all require files here for the file require "UltBB.setup"; require "Date.pl"; require "mods.file"; require "Styles.file"; require "ubb_library.pl"; }; &ReadParse; if ($in{'action'} eq "Redirect") { print "Location: $in{'GoTo'}\n\n"; exit; } #end Redirect check print ("Content-type: text/html\n\n"); #adjust bgcolor variables if ($BGColor ne ""){ $BGColor = qq(bgcolor="$BGColor"); } if ($AltColumnColor1 ne ""){ $AltColumnColor1 = qq(bgcolor="$AltColumnColor1"); } if ($AltColumnColor2 ne ""){ $AltColumnColor2 = qq(bgcolor="$AltColumnColor2"); } if ($CategoryStripColor ne ""){ $CategoryStripColor = qq(bgcolor="$CategoryStripColor"); } if ($TableColorStrip ne ""){ $TableColorStrip = qq(bgcolor="$TableColorStrip"); } if ($PageBackground ne ""){ $PageBackground = qq(background="$NonCGIURL/$PageBackground"); } if ($TableBorderColor ne ""){ $TableWidth2 = "100%"; $BorderTop = qq(
); $BorderBottom = qq(
); } else { $TableWidth2 = $TableWidth; $BorderTop = ""; $BorderBottom = ""; } if ($BBStatus eq "OFF") { &StandardHTML($BBClosedMessage); exit; } foreach $row(@in) { ($Name, $Value) = split ("=", $row); $Name = &decodeURL($Name); $Value = &decodeURL($Value); if ($Name eq "BypassCookie") { $BypassCookie = $Value; } if ($Name eq "category") { $category = $Value; $CategoryName = &GetCatName($category); } if ($Name eq "number") { $number = $Value; $number =~ s/\D//; } if ($Name eq "DaysPrune") { $DaysPrune = $Value; } } # end FOREACH $row if ($VariablesPath eq "") { $VariablesPath = $CGIPath; } #set Random Number- for use in Banner Ads, etc. if ( ($Header ne "") || ($Footer ne "") ) { $RandomNumber = &MakeRandomNumber; $RandomNumber2 = $RandomNumber + 100074; if ($Header ne "") { $Header =~ s/UBBrandomX/$RandomNumber/isg; $Header =~ s/UBBrandomY/$RandomNumber2/isg; } if ($Footer ne "") { $Footer =~ s/UBBrandomX/$RandomNumber/isg; $Footer =~ s/UBBrandomY/$RandomNumber2/isg; } } # end if header or footer if (@in == 0) { &Intro; exit; } if ($in{'action'} eq "intro") { &Intro; exit; } if ($in{'action'} eq "email") { &DoEmail($in{'ToWhom'}); } else { # all else requires the UBB Registration Library eval (require "register_lib.pl"); if ($@){ &StandardHTML("Sorry! The Registration Library is not Available. Contact the Admin"); exit; } } if ($in{'action'} eq "agree") { &Agree; } if ($in{'action'} eq "COPPAgree") { if($COPPAType eq 'COPPADenied') { &StandardHTML("Sorry! We do not permit anyone under age 13 to register at this Bulletin Board."); exit; }else { &ShowCOPPAAgree; } } if ($in{'action'} eq "useCOPPAform") { &ShowCOPPAForm; } if ($in{'action'} eq "register") { &Register; } if ($in{'action'} eq "lostpw") { if ($UseEmail eq "ON") { &LostPW; } else { &StandardHTML("Sorry, but this feature is not available, per your administrator's directions. Use your back button to return to the BB."); } } # INTRO PAGE SUBROUTINES # sub Intro { &get_cookie; #retrieves all current cookies &AssembleCats; #retrieve cats @CATEGORIES = &OpenFile("$NonCGIPath/categories.file"); #check for archives if (-e "$NonCGIPath/Archives/archives.pl") { @archives = &OpenFile("$NonCGIPath/Archives/archives.pl"); if ($archives[0] ne "") { @ArchiveLine = qq(

Sa

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.


Вы здесь » Sa » Music ♫ » Green Day


Green Day

Сообщений 31 страница 60 из 104

31

Так у него еще и брат есть!!!Бэнджи(какооой сюсюпупсягупсямуся)...Вот фота...
Но все равно Билли Джо Круче!!!

32

ох, это мне не знакомо....

33

Нет! Мне нравятся тока песни! И усе! :D

34

Нет, мне нра песни и парни, но они для мя старые.
Вот смотрите на кончерт ТН я хочу сходить именно чтоб за кулисы, пообщаться, а на концерт Грин Дэй я хочу просто сходить - просто чтоб там присутствовать. Просто быть там.

35

понятно, а я бою.сь гитариста ГД....

36

Да? А чем он тя напугал? :)

37

он какой-то странный.... :(

38

Я не знаю кто там гитарист, это беленький такой c татушкой на руке?

39

Привет,я Новенька....На счет Green Day....Это уматная группа....ну вы уже наверняка это знаете.Самый последний их альбом,по-моему,самый удачный...Разлетелся большим тиражом...Но это не самый продаваемый их альбом...Все песни на "American Idiot" по-настоящему круты,но хочу выделить две из них-это всеми любимые "Boulevard of broken dream" и "Wake me up"...кстати,последняя песня связана не только с 11 сентября,но и со смертью его отца....его отец умер в сентябре....А на счет участников,то Билли Джо Армстронг-суперррр!У него хороший голос,и сам он очень даже СИПАТИЧНЫЙ!!!! ;)

40

Мне нравится их несколько песен, конечно не так как ТХ... Но все же прикольная группа...

41

А я к Green Dey даже не знаю как относится...Есть у них 2 прикольные песенки..."Boulevard of broken dream"  и "Wake me up"...

42

Мне тоже эти песни очень нравятся, а остальное так себе...

43

Мне тоже очень нравится Green Day. Они крутые и клипы у них офигенные. Мне еще кажется группа Panic!At the disko! на ГД похожа...

44

Dark_prinsess написал(а):

Panic!At the disko!

ШИКАРНАЯ группа!!!!
Мне оч нра!!! кста...У них альбом есть?..

Сорри за флуд!

45

:) Пэник эт зе диско рулят!!!!Аьбом есть,как называется ненаю.
Не флудим.

46

Булевард оф брокэн дримз песня афихеная!!!
И ваще группа классная!

47

Че то все забыли про Green Day!!!!!!никто не пишет!!!!!!хоть пару картинок выкину!!!!!!

48

Люблю Гринов особенно American Idiot

49

народ,кто знает че сейчас Green Day делают!!!!!почему ни одного нового клипа???? :D

50

Лайнен написал(а):

народ,кто знает че сейчас Green Day делают!!!!!почему ни одного нового клипа????

чувак они ща клип с Ю2 выпустили на песню the saints are coming

51

:O Ох а я не видела????его уже крутят???? :O

Отредактировано Лайнен (2006-12-14 20:33:59)

52

Лайнен написал(а):

Ох а я не видела????его уже крутят????

ага по мтв

53

DaSHOOTa написал(а):

ага по мтв

так ну все начинаю круглые сутки смотреть MTV,надо запастись кофем а то долго не протяну!!!!! :D

54

The saints are coming...
The saints are coming...
эхххюююстащили песню...но Билли(странно,у меня ассоциация с Биллом Каулитцем)там так хорошо вышел...ему такие волосы идут....немного подлиннее и позапутаннее...лапочка! :D

55

Готика написал(а):

лапочка!

оу даааааааааааааааааааааааааааааааааа

56

мне не нравится его прича там...на фотке...люблю подлиннее! ^_^  :rolleyes:  :cool:

57

А я его люблю даж с голубыми волосами.

58

с голубыми?ну это уж слишком!

59

Готика написал(а):

с голубыми?ну это уж слишком!

я его любить буду даж лысым дохлым старикашкой!!!!!!!!!!!!!!!!!!!!!!!!!!!!

60

фууу....Даша....у тебя извращенный вкус.... :lol:


Вы здесь » Sa » Music ♫ » Green Day