Help for this page
Select Code to Download
Select
or
download this
$bar3 =~ s/(.)(?!\z)/$1\t/g;