{
       local $/;
       open FOO,$path;
       $text = readline FOO;
       close FOO;
   }
   print $text;