perl -w sample1.pl > stdout.txt 2>&1