$ echo o-o |perl -pe 'my $res; while ($_ =~ /([A-Za-z0-9]+)/g) { $res .=
$1; };print $res;'
ooo-o
$Почему на выходе 'o-o'? Как сделать, чтобы я получал только содержимое $res? -- С уважением, Alex Emergy -- ubuntu-ru mailing list ubuntu-ru@lists.ubuntu.com https://lists.ubuntu.com/mailman/listinfo/ubuntu-ru
