open (FILE, "$path");

   while (<FILE>) {
	print $_;
    }