perl open2: vyreseno

[jan labut]

Dne ne 6. duben 2003 00:24 jste napsal(a):
> Dobry den Panove
> Narazil jsen na jeden problemek v perlu, pokud zavolam ps aux pomoci open2,
> je vystup "print <$rdrfh>;" oriznut na 80 sloupcu, tudiz jsou nektere radky
> oseknuty a velice chybi. Opravdu nevim co s tim :(
> Budu vdecny za Vase rady
> dekuji Jan
>
> -- begin --
> #!/usr/bin/perl -w
> use strict;
> use IPC::Open2;
>
> my $pid = 0;
> my $rdrfh = '';
> my $wtrfh = '';
>
> $pid = open2($rdrfh, $wtrfh, '/bin/ps aux');
> print <$rdrfh>;
> -- end --
> perl 5.8.0
> mdk 9.0
>

Stahuji dotaz :)
jako vzdy problem je v zakladnich neznalostech
reseni je nastavit prostredi $ENV{'COLUMNS'}= xxx; a xxx bylo 80