Select Code to Download

package personel;

...


return 1;

use warnings;
use strict;
...
print "original array (should be unchanged): \n";
dd \@personnel;
print "\n";

c:\@Work\Perl\monks\polmed>perl test.pl
doesn't work:
...

original array (should be unchanged):
[["amy", 35], ["bill", 55], ["george", 28], ["jason", 71]]