Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -w
use strict;

...
$MOO[5] = 2;            # same
splice(@MOO,1,1,4);     # same again
print "$MOO[10]\n";     # croaks for non-existant element

Select or download this

use 5.006;
use strict;
use Exporter ();
...

#############################################
42;