Merge pull request #74 from 39832/master

Use env uniformly

build-data.exchanges

@@ -1,4 +1,4 @@
-#!/usr/local/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;

build-data.nanp

@@ -1,4 +1,4 @@
-#!/usr/local/bin/perl
+#!/usr/bin/env perl
 
 # THIS SCRIPT IS NOT INTENDED FOR END USERS OR FOR PEOPLE INSTALLING
 # THE MODULES, BUT FOR THE AUTHOR'S USE WHEN UPDATING THE DATA FROM OFCOM'S

build-data.stubs

@@ -1,4 +1,4 @@
-#!/usr/local/bin/perl
+#!/usr/bin/env perl
 
 # THIS SCRIPT IS NOT INTENDED FOR END USERS OR FOR PEOPLE INSTALLING
 # THE MODULES, BUT FOR THE AUTHOR'S USE WHEN UPDATING THE DATA FROM OFCOM'S

build-tests.pl

@@ -1,4 +1,4 @@
-#!/usr/local/bin/perl
+#!/usr/bin/env perl
 
 # THIS SCRIPT IS NOT INTENDED FOR END USERS OR FOR PEOPLE INSTALLING
 # THE MODULES, BUT FOR THE AUTHOR'S USE WHEN UPDATING THE DATA FROM OFCOM'S

lib/Number/Phone/UK/Data.pm

@@ -38,7 +38,6 @@ sub db {
 	# we want to re-open the DB if we've forked, because of
 	# https://github.com/DrHyde/perl-modules-Number-Phone/issues/72
 	# Unfortunately that's annoyingly hard to test
-	if($pid != $$) { print "PID changed, re-opening DB\n"; }
 	$pid = $$;
         $db = DBM::Deep->new($file);
     }