Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
node 252 size: 16128 MB
node 252 free: 16127 MB
node 253 cpus:
  2. or download this
    16:43 >perl 1971_SoPW.pl
250
...
253

16:44 >
  3. or download this
    while (<DATA>)
{
    print "$1\n" if / ^ node \s+ (\d+) \s+ \w+ : \s* $ /x;
    #                                            ^^^
}