|
|
|
| P is for Practical | |
| PerlMonks |
Caillte's scratchpadby Caillte (Friar) |
| on Jun 01, 2004 at 21:40 UTC ( [id://358630]=scratchpad: print w/replies, xml ) | Need Help?? |
use Data::Dumper; my @list = (1..10); my $d = Data::Dumper->new(\@list, qw(*list2)); my $str = $d->Dump(); my @list2; eval $str; print join '-', @list; print join '-', @list2; |
|