my $result=`perl -c compile.pl 2>&1 `;