Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
my $newStr = join q{}, @chars;

print $newStr;