Help for this page

Select Code to Download

Select or download this

c:\@Work\Perl>perl -wMstrict -le
"for ('filesystem          kbytes   used     avail    capacity  mounte
+d on',
...
"
'filesystem          kbytes   used     avail    capacity  mounted on' 
+-> 'Match Error'
'/dev/dsk/c0b0t0d0s4 12209400 5496486  6712914  46%       /home' -> '4
+6'

Select or download this

c:\@Work\Perl>perl -wMstrict -le
"use Data::Dump qw(dd);
...
    used => 5496486,
  },
)