open F, "cat file | /usr/bin/mycommand";
my $def_slash = $/; $/ = ""; eval <F>; $/ = $def_slash;
close F;