Select Code to Download

#!/usr/bin/perl
use strict;
use warnings;
...
\\\.foo
\\\\\\\.foo
\\\\\\\\\\\\\\\.foo

#!/usr/bin/perl
use strict;
use warnings;
...
\.foo\*\[1\]
\.foo\*\[1\]\*\[2\]
\.foo\*\[1\]\*\[2\]\*\[3\]