AppBase=/qqq perl -T -e '#!/usr/bin/perl -T
open my $FH, ">", $ENV{AppBase} or die $!;'