perl -d:Trace qqq.pl