# New Ticket Created by Zefram
# Please include the string: [perl #126935]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=126935 >
The .perl method for IO::Path objects produces faulty output:
> "/foo|bar".IO.perl
q|/foo|bar|.IO(:SPEC(IO::Spec::Unix))
> "/foo|bar".IO.perl.EVAL
===SORRY!=== Error while compiling /home/zefram/usr/lucifex/on_guile/EVAL_2
Two terms in a row
at /home/zefram/usr/lucifex/on_guile/EVAL_2:1
------> q|/foo|^bar|.IO(:SPEC(IO::Spec::Unix))
expecting any of:
infix
infix stopper
statement end
statement modifier
statement modifier loop
-zefram
