in reply to Re^4: Time zones
in thread Time zones

(untested)

perl -i.bak -pe '$. == 2 && print("BEGIN { \$ENV{\"TZ\"}=\"EST5EDT\"; 
+}\n");' `find . -name "*.pl"`

[download]

voila! 50 fixed scripts :)

In Section Seekers of Perl Wisdom