N
neilsolent
Hi
I am seeing weird behaviour when calling ps from perl on AIX.
I want to control the width of the output from ps through the COLUMNS environment variable.
The shell script gives truncated output when run directly, but
seems to ignore COLUMNS when called from Perl! Can anyone explain why?
thanks,
Neil.
root@test1:/tmp# cat /tmp/a.sh
#!/bin/sh
COLUMNS=10
export COLUMNS
ps -fu prdgwd -o "%u;%p;%P;%C;%y;%x;%a"
root@test1:/tmp# cat /tmp/a.pl
#!/bin/perl
print `/tmp/a.sh`;
root@test1:/tmp# /tmp/a.sh
RUSER PID PPID %CPU TT TIME COMMAND
prdgwd; 3604630;12910802; 0.0; pts/2; 00:00:00;-ksh
prdgwd;10223670; 3211486; 0.0; -; 00:00:00;/bin/ksh /usr/l
prdgwd;10551322;10223670; 0.0; -; 00:00:00;sleep 900
prdgwd;11075748; 1; 0.0; -; 00:00:27;/opt/IBM/ITM/ha
prdgwd;13566176;19529852; 0.0; -; 00:00:00;db2vend (PD Ven
prdgwd;18153590;19529852; 0.0; -; 00:00:06;db2acd
prdgwd;19005538;19529852; 0.2; -; 00:03:45;db2sysc 0
prdgwd;20971672; 3604630; 0.0; pts/2; 00:00:16;db2top -d clsgw
root@test1:/tmp# /tmp/a.pl
RUSER PID PPID %CPU TT TIME COMMAND
prdgwd; 3604630;12910802; 0.0; pts/2; 00:00:00;-ksh
prdgwd;10223670; 3211486; 0.0; -; 00:00:00;/bin/ksh /usr/local/dbabin/db2_log_cleanup.ksh
prdgwd;10551322;10223670; 0.0; -; 00:00:00;sleep 900
prdgwd;11075748; 1; 0.0; -; 00:00:27;/opt/IBM/ITM/ha/aix526/ud/bin/kuddb2 clsppal38_prdgwd
prdgwd;13566176;19529852; 0.0; -; 00:00:00;db2vend (PD Vendor Process - 258)
prdgwd;18153590;19529852; 0.0; -; 00:00:06;db2acd
prdgwd;19005538;19529852; 0.2; -; 00:03:45;db2sysc 0
prdgwd;20971672; 3604630; 0.0; pts/2; 00:00:16;db2top -d clsgwd
I am seeing weird behaviour when calling ps from perl on AIX.
I want to control the width of the output from ps through the COLUMNS environment variable.
The shell script gives truncated output when run directly, but
seems to ignore COLUMNS when called from Perl! Can anyone explain why?
thanks,
Neil.
root@test1:/tmp# cat /tmp/a.sh
#!/bin/sh
COLUMNS=10
export COLUMNS
ps -fu prdgwd -o "%u;%p;%P;%C;%y;%x;%a"
root@test1:/tmp# cat /tmp/a.pl
#!/bin/perl
print `/tmp/a.sh`;
root@test1:/tmp# /tmp/a.sh
RUSER PID PPID %CPU TT TIME COMMAND
prdgwd; 3604630;12910802; 0.0; pts/2; 00:00:00;-ksh
prdgwd;10223670; 3211486; 0.0; -; 00:00:00;/bin/ksh /usr/l
prdgwd;10551322;10223670; 0.0; -; 00:00:00;sleep 900
prdgwd;11075748; 1; 0.0; -; 00:00:27;/opt/IBM/ITM/ha
prdgwd;13566176;19529852; 0.0; -; 00:00:00;db2vend (PD Ven
prdgwd;18153590;19529852; 0.0; -; 00:00:06;db2acd
prdgwd;19005538;19529852; 0.2; -; 00:03:45;db2sysc 0
prdgwd;20971672; 3604630; 0.0; pts/2; 00:00:16;db2top -d clsgw
root@test1:/tmp# /tmp/a.pl
RUSER PID PPID %CPU TT TIME COMMAND
prdgwd; 3604630;12910802; 0.0; pts/2; 00:00:00;-ksh
prdgwd;10223670; 3211486; 0.0; -; 00:00:00;/bin/ksh /usr/local/dbabin/db2_log_cleanup.ksh
prdgwd;10551322;10223670; 0.0; -; 00:00:00;sleep 900
prdgwd;11075748; 1; 0.0; -; 00:00:27;/opt/IBM/ITM/ha/aix526/ud/bin/kuddb2 clsppal38_prdgwd
prdgwd;13566176;19529852; 0.0; -; 00:00:00;db2vend (PD Vendor Process - 258)
prdgwd;18153590;19529852; 0.0; -; 00:00:06;db2acd
prdgwd;19005538;19529852; 0.2; -; 00:03:45;db2sysc 0
prdgwd;20971672; 3604630; 0.0; pts/2; 00:00:16;db2top -d clsgwd