Select Code to Download

$ 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.

...
print scalar <A>;

-e syntax OK

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