Help for this page
substr($foo, 14, 10) =~ tr/,/+/; $foo =~ tr/,/\t/; substr($foo, 14, 10) =~ tr/+/,/;
$foo =~ tr/,/\t/; substr($foo, 14, 10) =~ tr/\t/,/;