Help for this page

Select Code to Download

Select or download this

*isa = \&UNIVERSAL::isa;

...
print $/;
print join " ", flatten2( @list, @list );
print $/;

Select or download this

1 2 3 4 5 6 7 8 1 4
1 2 3 4 5 6 7 8 1 4