if($line =~ /^$/){
   print "Leerzeile\n";
}