Re: [PATCH O.pm] avoid to clutter output with -l

Message-ID: <20010722145609.A766@rafael>

p4raw-id: //depot/perl@11438

diff --git a/ext/B/O.pm b/ext/B/O.pm
index 455a061..d72d31f 100644 (file)
--- a/ext/B/O.pm
+++ b/ext/B/O.pm
@@ -39,6 +39,7 @@ sub import {
                die $compilesub;
            }
 
+           local ($\,$",$,) = (undef,' ','');
            &$compilesub();
 
            close STDERR if $veryquiet;