Help for this page

Select Code to Download

Select or download this

while (my $line = <$fh>) {
chomp($line);
my ($uid, $login, $cpupr, $cpunpr, @data) = (split("\t",$line));
}

Select or download this
```
if ($line =~ /TOTAL COMMAND SUMMARY/)
```