В перловых скриптах в одну строку работают массивы или нет? у меня почему-то вот такая мини-парсилка не работает( perl -ne ' BEGIN { @a=split(/(^[a-z]{3}-[a-z]{2,3})/,$str)}; if($a[0]!=$a[1]); END { print "$str\n"; }'
В перловых скриптах в одну строку работают массивы или нет? у меня почему-то вот такая мини-парсилка не работает( perl -ne ' BEGIN { @a=split(/(^[a-z]{3}-[a-z]{2,3})/,$str)}; if($a[0]!=$a[1]); END { print "$str\n"; }'
Ответ на:
комментарий
от anonymous