Forum Webscript.Ru

Программирование => Perl => Тема начата: Mog. от 18 Мая 2004, 11:12:19

Название: $x=<DATA>
Отправлено: Mog. от 18 Мая 2004, 11:12:19

Видел как то скрипт, примерно такой

...
...
while ($x = ) {
$x =~ s/\\r|\\n//g;
while ($x) {
$S .= chr(hex(substr($x,0,2)));
$x = substr($x,2);
}
}
eval($S);
...
...
__END__
247c3d313b757365207374726963743b757365204347492071772820706172616d20293b6d792840
616e6b6574612c202466726f6d2c20247375626a656374293b266765745f646174613b6d79202473
...
...

Интересует, конкретно, чтение из , а точнее как эта ассемблеровщина по научному называется и где почитать об этом можно?

Название: $x=<DATA>
Отправлено: Chs от 18 Мая 2004, 13:23:40

Читать perldoc perldata после Scalar value constructors

Название: $x=<DATA>
Отправлено: Mog. от 18 Мая 2004, 16:37:54

Спасибо