Щенки миниатюрного бультерьера
главная о бультерьере фото видео анекдоты форум о собаках доска объявлений гостевая книга открытки
добавить сайт в каталог пород собак рейтинг сайтов о собаках TOP 100 добавить в избранное сообщить о сайте другу
МИНИАТЮРНЫЙ БУЛЬТЕРЬЕР. ЩЕНКИ С ЭЛИТНОЙ РОДОСЛОВНОЙ (066) 10-70-260 ПОДРОБНЕЕ ЗДЕСЬ >>>

У гончих прекрасные носы, у борзых быстрые ноги, волкодавы и доги - силачи, но все они ничего не стоят, потому что беззаветное мужество есть только у бультерьера.

Э. Сетон-Томпсон



бультерьер Мэгги

Опрос

#!/usr/bin/perl #--------------------- Переменные require "pvd_qcgf.pl"; $cont_typ="Content-type: text/html"; if (!-e "$NameBase") {print "$cont_typ\n\nНе найден файл с вопросами!!!";exit} $script_name=$ENV{'SCRIPT_NAME'}; $document_uri=$ENV{'DOCUMENT_URI'}; $http_referer=$ENV{'HTTP_REFERER'}; # REQUEST_URI # HTTP_REFERER $last_q_time=lqt(); if (!$document_uri) {getheader()} if ($ENV{'HTTP_COOKIE'} !~/golos=$last_q_time/i and !$document_uri and $in{'qotvet'} and $in{'golos'} eq $last_q_time and remote_ip()) { &EnterQuery; set_ip_cook(); exit; } elsif (($document_uri) and (!remote_ip() or $ENV{'HTTP_COOKIE'} =~ /golos=$last_q_time/i)) { print "$cont_typ\n\n"; &ShowResult; } elsif ($document_uri and $ENV{'HTTP_COOKIE'} !~ /golos=$last_q_time/i) { print "$cont_typ\n\n"; &ShowQuery; } else {print "$cont_typ\n\n!!!";exit} # проверка на IP адрес sub remote_ip { ($a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$a10,$a11,$a12,$a13)=stat("ip.db"); if (-e "ip.db" and $a8>0) { open(MEMB,"ip.db"); $lines=""; while () { $lines0=$_; $lines.=$lines0; } close(MEMB); if ($lines !~ /\#$ENV{'REMOTE_ADDR'}/i) {return 1} else {return 0} } else {return 1} } # передача редиректа + куков + занесение IP ------------------------------------ sub set_ip_cook { print "Location: $http_referer\n"; print "Set-Cookie: golos=".$last_q_time; (@days) = ("Sun","Mon","Tue","Wed","Thu","Fri","Sat"); (@months) = ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"); ($sec,$min,$hour,$mday,$mon,$year,$wday) = localtime(time+8064*3600); $sec = "0" . $sec if $sec < 10; $min = "0" . $min if $min < 10; $hour = "0" . $hour if $hour < 10; $year += 1900; $cookdate = "$days[$wday], $mday-$months[$mon]-$year $hour:$min:$sec GMT"; print "; expires=$cookdate; path=/"; print "; domain=$ENV{'HTTP_HOST'}"; print "\n\n"; open TEMPIP, ">>ip.db"; print TEMPIP "#$ENV{'REMOTE_ADDR'}"; close TEMPIP; return 1; } # получение заголовка ---------------------------------------------------------- sub getheader { read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); if (!$buffer) {$buffer=$ENV{'QUERY_STRING'}} if ($buffer) { @pairs = split(/&/, $buffer); foreach $pair (@pairs) { ($name, $value) = split(/=/, $pair); $value =~ tr/+/ /; $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg; $in{$name} = $value; } } } # получение номера вопроса ------------------------------------------------------ sub lqt { open MAINNTX,"<$NameBase"; @LINES=; $SIZE=@LINES; close(MAINNTX); for ($i=$SIZE;$i>=0;$i--) { chomp($LINES[$i]); $String=$LINES[$i]; if ($String) {@record=split(/\x01/,$String); return $record[0];} } } #-------------------- Вывод на экран результатов sub ShowQuery { $checkon="checked"; open MAINNTX,"<$NameBase"; @LINES_b=; $SIZE_b=@LINES_b; close(MAINNTX); for ($i=$SIZE_b;$i>=0;$i--) { chomp($LINES_b[$i]); $String=$LINES_b[$i]; if ($String) { @record=split(/\x01/,$String); $Query=$record[1]; $SizeOtvet=$record[2]; print "

$Query
"; for ($i=1;$i<=$SizeOtvet;$i++) { if ($i==2) {$checkon=""} print "$i.\n", $record[$SizeOtvet+3+$i],"
\n"; } print "
Архив опросов"; return 0; } } } #--------- Вывод результатов на экран sub ShowResult { open MAINNTX,"<$NameBase"; @LINES=; $SIZE=@LINES; close(MAINNTX); for ($i=$SIZE;$i>=0;$i--) { chomp($LINES[$i]); $String=$LINES[$i]; if ($String) { @record=split(/\x01/,$String); $Query=$record[1]; $SizeOtvet=$record[2]; last; } } print "$Query
\n"; if ($SizeOtvet>0) {$len_col=int(125/$SizeOtvet)} else {$len_col=10} if ($len_col>10) {$len_col=10} for ($i=1;$i<=$SizeOtvet;$i++) { print "\n"; } print "
$i.$record[$SizeOtvet+$i+3]
 ", int(($record[$i+3]/$record[3])*100),"%
"; } else {print "0>0%
"} print "
"; if ($show_voiter) {print "всего голосов: $record[3].
\n"} print "
\nАрхив опросов
"; } #--------- Внесение результатов (x=2&qkode=<код вопроса>&qotvet=<номер ответа>) sub EnterQuery { open MAINNTX,"<$NameBase"; @LINES_b=; $SIZE_b=@LINES_b; close(MAINNTX); open MAINNTX,">$NameBase"; for ($i=$SIZE_b;$i>=0;$i--) { chomp($LINES_b[$i]); $String=$LINES_b[$i]; if ($String) { @record=split(/\x01/,$String); for ($j=1;$j<=$record[2];$j++) {if ($j==$in{'qotvet'}) {$record[$j+3]+=1}} for ($k=1;$k<=$record[2];$k++) {$result="$result\x01$record[$k+3]";} for ($k=1;$k<=$record[2];$k++) {$result="$result\x01$record[$k+3+$record[2]]";} if ($in{'qotvet'}) {$record[3]+=1} $LINES_b[$i]="$record[0]\x01$record[1]\x01$record[2]\x01$record[3]$result\x01\n"; $Query=$record[1]; $SizeOtvet=$record[2]; print MAINNTX @LINES_b; close(MAINNTX); return 1; } } }

Бультерьер, выживший после 9 пулевых ранений, обрел хозяевНовости о собаках от бультерьер клуба
Ольга Алюшенко. Рассказ. Веселый бультерьер
Самые добрые собаки бультерьеры?
Утонула
Мой друг — бультерьер!
Бультерьер и звезды на «AFI Night at the Movies»
Стих "О Бултерьерах и прочих бойцовых…"
История бультерьера Рича
Бультерьера-артиста уволили из театра за талант
Ольга Макарова "Опасные собаки"
Геннадий Маргулис "Бультерьеру Бруту"
Нэсси, рассказ о ненависти и любви
Начинающим владельцев бультерьеров - Ю.В. Мишунина
Бультерьер на мобильный - скачать 3GP видео бесплатно
У.Э. Маккей-Смит - Характер бультерьера
Эрнест Эберхард - Бультерьер
Бультерьер Мотя умеет говорить по-человечески
Лечебная кинология
Проблемы поведения собак
Собаку Путина могут кастрировать
Бультерьер против «Matiz»
Александр Хабургаев. О "бойцовых" собаках
Добро пожаловать на новый рейтинг англоязычных сайтов English Bull Terrier TOP-100
Город собак
Иван Затевахин. О "бойцовых" собаках
Бультерьер спас человека
Рэймонд Оппенгеймер. Разведение бультерьеров
Люди и бультерьеры
Бультерьер Руфус самая лучшая собака в мире
Первой полицейской собакой был бультерьер
Статистика укусов собаками людей
Концлагерь для собак
Бультерьер ищет спасения в суде от хозяина-живодера
День собаки
Во всем виноваты ... собаки
Одна из австралийских провинций «избавится» от «бойцовых» пород собак
Бультерьер быстрее всех
Джеймс Хэрриот «О всех созданиях - больших и малых»
Кенгуру усыновила щенка бультерьера
Памятник бультерьеру
Бультерьер Мигель любил людей, но люди его убили. За то, что он бультерьер
Бультерьер в очках
Охота с бультерьером
Бультерьер Оуэна станет моделью
Истинный бультерьер
Бультерьеры - ловцы крыс
Розенбаум 14 лет спал с бультерьером
Бультерьер сегодня
Шейла Барнфорд. Невероятное путешествие
Не просто собака, а кусок души
Драки собак
Мурманские власти запретили собак.
Жарова Г.О. Социализация собак
Человек-бультерьер
Куринная Т.П. О бультерьерах
Памяти Снапа, верного друга посвящается.
Свирепый, жестокий, беспощадный, агрессивный
В Италии колли и сенбернары признаны опасными собаками
"Страшные" собаки
Собака по имени Смерть...
В Гондурасе собачий геноцид
Ода бультерьеру
Бультерьер умнее человека
Слышим звон…
В защиту болонок
Интервью с хозяином "Гладиатора"
Бультерьер - это навсегда
Принцессу Анну приговорили к штрафу за неправильное обращение с бультерьером
Бультерьер Зая выкормила детеныша ягуара
Бультерьер погиб, спасая хозяина из огня
Доктор X. С. Лайнинген-Вестербург "Путель"
Шилова Ольга. Друг или агрессор?
бультерьер

Опрос

#!/usr/bin/perl #--------------------- Переменные require "pvd_qcgf.pl"; $cont_typ="Content-type: text/html"; if (!-e "$NameBase") {print "$cont_typ\n\nНе найден файл с вопросами!!!";exit} $script_name=$ENV{'SCRIPT_NAME'}; $document_uri=$ENV{'DOCUMENT_URI'}; $http_referer=$ENV{'HTTP_REFERER'}; # REQUEST_URI # HTTP_REFERER $last_q_time=lqt(); if (!$document_uri) {getheader()} if ($ENV{'HTTP_COOKIE'} !~/golos=$last_q_time/i and !$document_uri and $in{'qotvet'} and $in{'golos'} eq $last_q_time and remote_ip()) { &EnterQuery; set_ip_cook(); exit; } elsif (($document_uri) and (!remote_ip() or $ENV{'HTTP_COOKIE'} =~ /golos=$last_q_time/i)) { print "$cont_typ\n\n"; &ShowResult; } elsif ($document_uri and $ENV{'HTTP_COOKIE'} !~ /golos=$last_q_time/i) { print "$cont_typ\n\n"; &ShowQuery; } else {print "$cont_typ\n\n!!!";exit} # проверка на IP адрес sub remote_ip { ($a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$a10,$a11,$a12,$a13)=stat("ip.db"); if (-e "ip.db" and $a8>0) { open(MEMB,"ip.db"); $lines=""; while () { $lines0=$_; $lines.=$lines0; } close(MEMB); if ($lines !~ /\#$ENV{'REMOTE_ADDR'}/i) {return 1} else {return 0} } else {return 1} } # передача редиректа + куков + занесение IP ------------------------------------ sub set_ip_cook { print "Location: $http_referer\n"; print "Set-Cookie: golos=".$last_q_time; (@days) = ("Sun","Mon","Tue","Wed","Thu","Fri","Sat"); (@months) = ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"); ($sec,$min,$hour,$mday,$mon,$year,$wday) = localtime(time+8064*3600); $sec = "0" . $sec if $sec < 10; $min = "0" . $min if $min < 10; $hour = "0" . $hour if $hour < 10; $year += 1900; $cookdate = "$days[$wday], $mday-$months[$mon]-$year $hour:$min:$sec GMT"; print "; expires=$cookdate; path=/"; print "; domain=$ENV{'HTTP_HOST'}"; print "\n\n"; open TEMPIP, ">>ip.db"; print TEMPIP "#$ENV{'REMOTE_ADDR'}"; close TEMPIP; return 1; } # получение заголовка ---------------------------------------------------------- sub getheader { read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'}); if (!$buffer) {$buffer=$ENV{'QUERY_STRING'}} if ($buffer) { @pairs = split(/&/, $buffer); foreach $pair (@pairs) { ($name, $value) = split(/=/, $pair); $value =~ tr/+/ /; $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg; $in{$name} = $value; } } } # получение номера вопроса ------------------------------------------------------ sub lqt { open MAINNTX,"<$NameBase"; @LINES=; $SIZE=@LINES; close(MAINNTX); for ($i=$SIZE;$i>=0;$i--) { chomp($LINES[$i]); $String=$LINES[$i]; if ($String) {@record=split(/\x01/,$String); return $record[0];} } } #-------------------- Вывод на экран результатов sub ShowQuery { $checkon="checked"; open MAINNTX,"<$NameBase"; @LINES_b=; $SIZE_b=@LINES_b; close(MAINNTX); for ($i=$SIZE_b;$i>=0;$i--) { chomp($LINES_b[$i]); $String=$LINES_b[$i]; if ($String) { @record=split(/\x01/,$String); $Query=$record[1]; $SizeOtvet=$record[2]; print "

$Query
"; for ($i=1;$i<=$SizeOtvet;$i++) { if ($i==2) {$checkon=""} print "$i.\n", $record[$SizeOtvet+3+$i],"
\n"; } print "
Архив опросов"; return 0; } } } #--------- Вывод результатов на экран sub ShowResult { open MAINNTX,"<$NameBase"; @LINES=; $SIZE=@LINES; close(MAINNTX); for ($i=$SIZE;$i>=0;$i--) { chomp($LINES[$i]); $String=$LINES[$i]; if ($String) { @record=split(/\x01/,$String); $Query=$record[1]; $SizeOtvet=$record[2]; last; } } print "$Query
\n"; if ($SizeOtvet>0) {$len_col=int(125/$SizeOtvet)} else {$len_col=10} if ($len_col>10) {$len_col=10} for ($i=1;$i<=$SizeOtvet;$i++) { print "\n"; } print "
$i.$record[$SizeOtvet+$i+3]
 ", int(($record[$i+3]/$record[3])*100),"%
"; } else {print "0>0%
"} print "
"; if ($show_voiter) {print "всего голосов: $record[3].
\n"} print "
\nАрхив опросов
"; } #--------- Внесение результатов (x=2&qkode=<код вопроса>&qotvet=<номер ответа>) sub EnterQuery { open MAINNTX,"<$NameBase"; @LINES_b=; $SIZE_b=@LINES_b; close(MAINNTX); open MAINNTX,">$NameBase"; for ($i=$SIZE_b;$i>=0;$i--) { chomp($LINES_b[$i]); $String=$LINES_b[$i]; if ($String) { @record=split(/\x01/,$String); for ($j=1;$j<=$record[2];$j++) {if ($j==$in{'qotvet'}) {$record[$j+3]+=1}} for ($k=1;$k<=$record[2];$k++) {$result="$result\x01$record[$k+3]";} for ($k=1;$k<=$record[2];$k++) {$result="$result\x01$record[$k+3+$record[2]]";} if ($in{'qotvet'}) {$record[3]+=1} $LINES_b[$i]="$record[0]\x01$record[1]\x01$record[2]\x01$record[3]$result\x01\n"; $Query=$record[1]; $SizeOtvet=$record[2]; print MAINNTX @LINES_b; close(MAINNTX); return 1; } } }

Здесь может быть ваша кнопка!

Для того чтобы поставить банер 88х31 другого сайта вместо этого, просто заполните форму.
В форме заполните поля URL сайта и URL банера и нажмите кнопку "отправить".
Принцесса Анна со своими бультерьерами. Фото с сайта forum.pethobbyist.com
Принцесса Анна со
своими бультерьерами

      Ни одна порода собак не вызывает столько разных чувств и эмоций, как бультерьер. Одни считают бультерьера шедевром английской кинологии, другие считают, что бультерьера надо запретить. Одни считают бультерьера верхом совершенства, собаку с идеальным телосложением, великолепным движением, удобными для городской квартиры размерами и шерстью. Другие считают бультерьера самой уродливой собакой. Одни считают бультерьера самой высокоинтеллектуальной собакой, как, например, Вальтер Скотт, Раймонд Оппенгеймер и многие другие известные личности. Другие, как, например, Олег Басилашвили - тупой собакой, способной только наводить ужас на окружающих.
      В книгах большинства ведущих кинологов мира пишется, что бультерьер одна из самых лучших пород собак для семей с маленькими детьми. И, тем не менее, бывали случаи нападения бультерьеров на людей.
      Так что же представляет собой бультерьер? Почему такие разные мнения у людей об этой породе собак? И, наконец, что является правдой, а что является вымыслом, заблуждением или просто слухом?
     Об этом и многом другом Вы узнаете, посетив этот сайт.
     В разделе О БУЛЬТЕРЬЕРЕ Вы узнаете об истории породы, характере бультерьера, о воспитании, содержании и уходе, о стандарте породы и подготовке к выставке, а также заботе о здоровье.
     В разделе ФОТО и ВИДЕО Вы можете посмотреть видеоролики и фотографии бультерьеров. Если Вы хотите поместить фотографии или видео своих собак на сайте Bull Terrier Club- свяжитесь с web дизайнером.
     В разделе ГОСТЕВАЯ КНИГА Вы можете опубликовать свое мнение о сайте, рассказать о своем бультерьере, его содержании, уходе и воспитании. Работают ДОСКА ОБЪЯВЛЕНИЙ и ФОРУМ.
     В разделе АНЕКДОТЫ размещены анекдоты, приколы, слухи, сплетни и другая не менее важная информация.
      Желаю Вам получить удовольствие от посещения сайта English Bull Terrier Club


******
volvo

Новости Украины - быстрые новости Украины
обсудить на форуме | рейтинг | добавить сайт в каталог | добавить в избранное или нажмите Ctrl+D | сообщить о сайте другу

последние темы на форуме о бультерьерах и других породах собак автор
Собираем подписи против АНТИСОБАЧЬЕГО закона!!!! Glip
vjazka Lena
интересно Богдан
Проблема с прогулками на поводке Валерий

Бультерьер клуб Мак-Ларен Rambler's Top100 Яндекс цитирования


[присоединитесь к WEB-кольцу бультерьер сайтов]
[предыдущий] [случайный] [все сайты] [следующий]
©2000 - 2016 Bull Terrier Club создание сайтаYN