Select Code to Download

$ perl -E 'my $x = "A\tB\t\tC"; say $x; say $x =~ y/\tABC/\t{3}/rs;'
A       B               C
{       3       }

# use 5.014;
# use warnings;
# use autodie;