Help for this page

Select Code to Download


  1. or download this
    use Algorithm::Loops qw( MapCharU );

my $bar = [ MapCharU { [ @_ ] } @$foo ];