perl -e '$ENV{TZ} = "DST";print scalar localtime(), "\n";'