pdist: correct comment pointing to master source

pdist/pdist

@@ -1,13 +1,14 @@
-#! /usr/local/bin/perl -w
+#! /usr/bin/perl
 
-# $Header: /project/admin/pdist/pdist,v 1.59 2014/03/31 10:09:30 root Exp root $
+# https://github.molgen.mpg.de/mariux64/mxtools
 
 #--------------------------------------------------------------
 # My::Escaper helper class
 # static methods needed be My::FileInfo and main
 
 package My::Escaper;
 use strict;
+use warnings;
 
 our @ISA=qw(Exporter);
 our @EXPORT=qw(fn_escape fn_unescape);
@@ -32,6 +33,7 @@ sub fn_unescape
 #--------------------------------------------------------------
 package My::FileInfo;
 use strict;
+use warnings;
 import My::Escaper;
 
 use Class::Struct (map {$_=>'$'} qw(name dev ino type perm nlink uid gid rdev size mtime target)) ;
@@ -150,6 +152,7 @@ sub lstat
 #--------------------------------------------------------------
 package main;
 use strict;
+use warnings;
 
 #
 # Emergency search path for perl modules at end of @INC