open FOO,$path;
   print <FOO>