$ perl 1210614-1.pl
/foo/bar at 1210614-1.pl line 9.