1. Perl / Говнокод #11914

    −163

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    #!/usr/bin/perl -w

print "Это писесольная программа. Дать пеке писю? [Y/n]";
$vvod = 1;
$pisya = "Пекацефал писю пососал";
$start = <STDIN>;


  while ($start eq "y\n" or "Y\n") { 
 if ($vvod < 100) { 
       print "$pisya\n"; $vvod++; 
      } if ($vvod == 100) { 
     exit 0; } 
    }

    Написано обладателем IQ 150.

    Запостил: VictorVonSpok, 12 Октября 2012

    Комментарии (10) RSS

    • ava eth0 12.10.2012 06:21 # +4

      Привет, пиписюнчик. Почему не в школе? До каникул ещё уйма времени.
      Ответить

    • ava хуита 12.10.2012 07:36 # 0

      Неистова плюсую колченяшу.
      Ответить

    • ava Steve_Brown 12.10.2012 10:04 # 0

      http://lurkmore.to/Педальная_бригада

      М-да.
      Ответить

      • ava Steve_Brown 12.10.2012 10:05 # 0

        http://lurkmore.to/Педальная_бригада

        (кстати, любопытно, только сейчас заметил: если я пишу 
        [color=blue][u]
        , то подчеркивание получается синим, а если наоборот - 
        [u][color=blue]
        , то черным. Firefox.)
        Ответить

        • ava Lowezar 12.10.2012 10:12 # 0

          В хроме тоже. Но звучит логично в принципе. Подчёркивание-то единое на весь контент внутри, с какой радости ему подстраиваться под каждый элемент?
          Ответить

    Добавить комментарий