Select Code to Download

use strict;

...
            print "Bad RegEx\n";
      }
exit;

http:
127.0.0.1
home_dir

use strict;

my $line = "http://127.0.0.1/home_dir";
...
            print "Bad RegEx\n";
      }
exit;