5.8.8:
perl -we '$r = \""; open $out, ">", $r or die; print $out "test"; close $out; print $$r,"\n"'
печатает "test"

5.8.9:
perl -we '$r = \""; open $out, ">", $r or die; print $out "test"; close $out; print $$r,"\n"'
Modification of a read-only value attempted at -e line 1.
Died at -e line 1.

С $$r = "" работают оба варианта.
Будте бдительны при обновлении :)

--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить