Re: [MacPerl] Mac GUI Q: STDOUT to Mac::Windows?

[Bart Lateur]

On Fri, 9 Mar 2001 11:32:51 +0000, Alan Fry wrote:

>At 8:58 pm +0100 08/03/01, Bart Lateur wrote:
>>Or simply do
>>      select FOO;
>>first.
>
>Of course, thanks. I always forget about 'select'. One trap one would 
>have to beware of is that print() basically takes a list as an 
>argument so you would have make provisions at the receiving end to 
>deal appropriately with lists.

The standard behaviour would be to join the print arguments with $, and
append $\ to it.

        sub PRINT {
            my $self = shift;
            local $^W;  # no warnings if $\ or $, are undefined
            my $toprint = join($,, @_).$\;
            ... # now output $toprint
        }

-- 
        Bart.