It's not like this is intended behavior :)

My other favorite is even sicker and more useful. Credit this time to audreyt++ who checked this into pugs with the commit message

do not mention $@% in the Makefile for portability

We had a one-liner that was breaking differently on different platforms. Insane desugaring to the rescue!

-       \$(PERL) -MFile::Spec -e "my (undef, \$\$dir, \$\$file) = File
+::Spec->splitpath(shift); chdir(\$\$dir); system(q+$hsc2hs $hsc2hs_fl
+ags + . \$\$file);" \$<
+       \$(PERL) -MFile::Spec -e "sub p () { File::Spec->splitpath(ARG
+V->[0]) }; chdir((p)[1]); system(q($hsc2hs), qw($hsc2hs_flags), (p)[2
+]);" \$<
[download]

(The thing to note here is ARGV->[n].)