请帮忙解释一下下面的perl语言的意义

请帮忙解释一下下面的perl语言的意义#;-*- Perl -*-if(-e "INCAR" && -e "KPOINTS" && -e "POTCAR" && -e "akmc.sub"){chomp($line=`qsub akmc.sub | tail -1`);$line=~s/^\s+//; 这一句看不懂,不知道是干什么的@line=split(/\s+/,$line); 这一句也不懂$jobID=$line[2];}else{die "Error signal from submit.pl";}print "$jobID\n";if(!($jobID=~/^\d+$/)){ print "2bsubmitted";}