Select Code to Download

$SYS_NAME=`uname -s`;
if ($SYS_NAME =~ "AIX") {
...
   `/usr/bin/df -k | /usr/bin/sort +6 >$FILE`;
}
# ...

my @df_stdout;
if ($^O =~ /aix/i) {
...
for (@df_stdout) {
   # Put your while loop body here...
}

for (@df_stdout) {

for my $line (@df_stdout) {