Help for this page

Select Code to Download


  1. or download this
    *a = \"cons";
$a = "something";
print "$a\n";
__END__
Modification of a read-only value attempted at - line 2.
  2. or download this
    (undef, *a) = \(undef, "cons");
$a = "something";
print "$a\n";
__END__
something
  3. or download this
    (undef, *a) = (\undef, \"cons");
$a = "something";
print "$a\n";
__END__
Modification of a read-only value attempted at - line 2.