Help for this page

Select Code to Download

Select or download this

$ perl -Mstrict -Mwarnings -E '
    my $x = "[8/29/2013 7:16:45 AM] User abc def [DEFAULT]";
...
    say $x;
' | cat -vet
[8/29/2013^I7:16:45^IAM] User abc def [DEFAULT]$

Select or download this

$ perl -Mstrict -Mwarnings -E '
    my $x = "[8/29/2013 7:16:45 AM] User abc def [DEFAULT]";
...
    say $x;
' | cat -vet
[8/29/2013^I7:16:45^IAM] User abc def [DEFAULT]$