Help for this page

Select Code to Download


  1. or download this
    my $free = ( split ' ', qx{ dir|find "bytes free" } )[2];
$free =~ s/\D//g;