Search Results

При двойных кавычек строка интерполируется , интерпретатор не может понять эскейп последовательность \d и \z...

%hash = ( ..... if($hash{$_} eq 'bolshaya'){print $_;} ..... }

#!perl -w use strict; my %h = ( NAME1 => 'Kaimi', NAME2 => '$p01nt', NAME3 => 'ZET36',...

"на подобие такого".. +) _http://ru.youtube.com/watch?v=bnZ-lwQS5O4

perl -MLWP::Simple -ne "chomp;print if head(\"http://cs62.vkontakte.ru/u2346858/4564087/$_.jpg\");" dict.txt dict.txt x_a12aa5f3f9...

Кепка солдата Вермахта M43 _http://shop.militarist.com.ua/product/4836

пытался полностью соответствовать условию: C:\>perl -e "$_ = "tipa" ; print " tipa C:\>perl -e "$_ = '\"tipa\"' ; print " "tipa" perl...

perl -e "s\\<input type=\"hidden\" name=\"sid\" value=\"01a36e4d002d26dd4e1621d5ef495f19\"/>\;print /name=\"sid\" value=\"([a-f0-9]{32})\"\/>/"

perl -pne "s;(.+) l:(.+) p:(.+);$2:$3\@$1;" ftp.txt > n_ftp.txt кто меньше ? :D

ftp.txt ftp.user.com l:qwer p:11111 ftp.user.com l:qw123 p:1234 ftp.user.com l:qw123 p:4321 ftp.user.com l:q123 p:2314 perl -ne "/(.+)...

* 2016 - Европа почти безлюдна. ...... * 2043 - Мировая экономика процветает. В Европе правят мусульмане. (;,,;)

13=(5*5*5+5)/(5+5)

давай без оскорблений.я высказал свою критику . совсем неадекватный.. $ua->head(@_[0])->as_string=~/200 OK/ - на два символа меньше - нафиг...

genom-- оч.негативное впечатление .. совершенно не читаемый код .. perldoc perlstyle поскольку написано под винду.. $dum='C:\Documents and...

for (my $i=0; $i < scalar @uins; $i++) имхо так интересней for ( my $i=0; $i < $#uins+1; $i++ ) sub xor_password { my $password =...

#!perl -w use strict; my $f = shift||exit print "\x09usage $0 <file>"; open my $FILE,$f or die $!; foreach my $text (<$FILE>) {...

#!perl -w use MIME::Base64; use Digest::MD5; system('ffmpeg -i koza.3gp -ss 00:00:36 -s 320x240 -y -f mjpeg koza.jpg'); open DATA ,...

Это не байт код :)) Скрипт обфускацирован require "wws_lib.dat"; Для включения пакета в программу используется функция require()...

2 Kaimi #!perl -w use strict; my $res='<a href="text1" > <a href="text2" > <a href="text3" >'; my @parse =...

Шестнадцатеричный код цвета #A1B2F2 Первые две цифры кода (двухзначное шестнадцатеричное число) определяют интенсивность красного, следующие...