[реклама вместо картинки] #!/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 » Band » Личная жизнь Tokio Hotel


Личная жизнь Tokio Hotel

Сообщений 421 страница 450 из 741

421

Ясно, а я уж подумала! :rolleyes:  :rolleyes: А вообще повезло девушке, с чем я её и поздравляю! :yahoo:  :yahoo:

422

Щас они очень тепло друг с другом общаются, но пока рано судить о них как о паре... Подождем увидим... ^_^

423

Она хотя бы симпатичная, а то бывает увидишь фото и страх берет, где такую откопал? Вообще у Билли немного извращенный вкус...но мне кажеться что с этой девой у них ничего не будет...

424

у них ничего не будет...

Будем надеется...

425

Я согласна с тем,что у Билла извращенный вкус,особенно когда я увидела ту рыжую,которая была его девушкой,после этого я поняла,что настоящих красивых девушек он ещё не видел,потому как у нас в России,я считаю девушки НАМНОГО красивее!!!

426

Билл как-то в интервью сказал,что перед тем,как сделать окончательный выбор(я имею ввиду выбор девушки),он заедет в Росси...ему сказали,что русские девушки самые красивые!Но я знаю наверняка,что девушка Билла будет точно не из Германии!

427

Билл: Я, вообще-то, не люблю распространяться о своей личной жизни, но я знал, что с известностью приходят такие проблемы, как выставленная на всеобщее обозрение личная жизнь, и поэтому я лучше сам все расскажу, чем потом читать всякие глупости, сказанные якобы мною. Да, у меня действительно есть девушка, это наша немецкая певица Элис, хотя в России о ней, возможно, не знают. Честно говоря, я бы предпочел скорее простую девушку, не известную и все такое, но Элис – духовно близкий мне человек, у нас схожие характеры, имы понимаем друг друга с полуслова, хотя времени, чтоб повидаться у нас часто просто не бывает. Но все же я не могу сказать, что люблю ее. Я очень серьезно отношусь к таким вещам, и не разбрасываюсь словами, и мне кажется, что это еще не девушка для моей жизни. Перед окончательным выбором еще обязательно съезжу в Россию (смеется).

Да у меня есть эта статья...

Отредактировано Зажигалка (2006-08-24 09:31:45)

428

Сейчас у него девушки нет, не волнуйтесь...

429

Зажигалка, прямо камень с души свалилсь, фух! Вообще-то уже не кто не знает точно, кто у Билла, с кем он, и вообще есть ли у него девушка. Будем надеятся, что нет.

430

Ну блин,вы так говорите,как будто бы у Билла не должно быть вообще девушки!!!А когда она у него появляется,вы называете ее некрасивой,и говорите,что у него извращенный вкус....если вам нравится Билл,то надо уважать его вкус!

431

Готика
Правильно говоришь!

Если у Билла появится девушка, то мы радоваться должны будем...Он же будет счастлив!  :rolleyes:

432

Только не совсем он счастлив будет....он же хочет найти свою любовь...вот когда найдет,тогда точно счастлив будет....а так,просто девушка-это счастье на миг!

433

Готика
:) пусть он испытает хоть миг счастья!

434

действительно!

435

ТАК И БЫТЬ...МЫ ЕМУ РАЗРЕШАЕМ!!!  :D

436

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

Ну блин,вы так говорите,как будто бы у Билла не должно быть вообще девушки!!!А когда она у него появляется,вы называете ее некрасивой,и говорите,что у него извращенный вкус....если вам нравится Билл,то надо уважать его вкус!

Когда я прочитала эту статью, была за него рада... На другом форуме такую шумиху подняли... :O  Все так реагировали, как будто наступил конец света... Я таких не понимаю...

437

Да вообще!!!Вот именно,все устраивают столько шума из-за его девушек,как будто он единственный на этом белом свете пацан!!!и что никому он не достанется....ах какое горе!!!!

438

Нет, кому-то потом он всё же достанется. Девчонки, на самом деле многие девушки горюют, когда у их кумира появляется девушка, ну разве вам немного не грустно из-за этого? Мне немножко печально, наверное от безысходности. А вообще я как и вы очень рада, если счастлив ПО-НАСТОЯЩИМУ он, то конечно, рада и я.

439

Не я то рада!!!Но вот!!Не очень...че та прыгать от радости не хоч!!Ну и чего!Рано или поздно у них будут девки!!Чего и следовало ожидать!!Разве у таких симпатюлек не далжно быть девушки???Желаю им хорошеньких девак из РАША!!!Как бы я хотела что бы это были девченки из НАС!!!

440

А мне как-то все равно,есть у него девчока или нет...даже если он мне очень нравится.....

441

Девчонки, давайте успокоимся и рассудим. У них КОНЕЧНО будут девушки, которые их будут любить и просто обажать. Билл найдёт свою настоящую любовь, Том найдёт свой идеал. А кто эти счастливицы и откуда они будут, время покажет. И гадать не стоит, мне кажится.

442

Len-ochka
Правильно!!! Золотые слова!  :)

443

;) Спасибо :yahoo:  :yahoo:  :lol: Рада. что угодила :)

444

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

Правильно!!! Золотые слова!

:yes:  :yes:  :yes:  :yes:

445

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

Я согласна с тем,что у Билла извращенный вкус,особенно когда я увидела ту рыжую,которая была его девушкой,после этого я поняла,что настоящих красивых девушек он ещё не видел,потому как у нас в России,я считаю девушки НАМНОГО красивее!!!

Ты имеешь ввиду ту Насти или как ее там?она не его девушка

446

Аленка
Нет? а кто-то выставлял ее фото и сказал, что она его девушкой была...

447

Короче я не знаю куда эту фоту запихнуть...сюда выставлю...Мне очень понравился друг близнецов Андреас...

448

ФЮЮЮЮЮЮЮ!!!!не люблю блондинов!!!тем более,что ему такая прича не идет!

449

Да ну...мне кажется что идет...

450

когда кажется-криститься надо....ему эта прича идет,если только он ее так на бок не будет делать!


Вы здесь » Sa » Band » Личная жизнь Tokio Hotel