Use of uninitialized value in string eq at /apps/bin/blah/reconcile_withdotsh.pl line 68. main::BEGIN() called at /apps/bin/blah/reconcile_withdotsh.pl line 73 eval {...} called at /apps/bin/blah/reconcile_withdotsh.pl line 73 #### 67 BEGIN { 68 unless( $ENV{ +__FILE__ } eq __FILE__ ){ 69 delete $ENV{LIBPATH}; 70 $ENV{ +__FILE__ } = __FILE__; 71 exec $^X, __FILE__, @ARGV; # relaunch without LIBPATH 72 } 73}