perl -wle'
sub new { bless \pop, shift }
my $main = new ("ClassName", 42);'
Modification of a read-only value attempted at -e line 2.
This is perl, v5.6.1 built for i586-linux
This is perl, v5.8.0 built for i686-linux