while ()
     {
     <>;
     last unless /\S/;
     print FILE;
     }