$ perl -MO=Deparse -wl -MFatal=open -e 'open A, "date|"; print scalar <A>'
Name "main::A" used only once: possible typo at -e line 1.

# ..
# lots of imported stuff from Fatal
# ..

&open('A', 'date|');
print scalar <A>;

-e syntax OK

##</code><code>##

$ perl -wl -MFatal=open -e 'open my $pipe, "date|"; print scalar <$pipe>'
Tue Mar 25 02:37:32 CET 2003