Help for this page

Select Code to Download


  1. or download this
    # Connect to the database
my $dbh = DBI->connect("DBI:CSV:f_dir=.;csv_eol=\n;");
...
  $ips{ $row->{colIP} }->{ colPartitionFree } += $row->{colPartitionFr
+ee};
}
print Dumper \%ips;
  2. or download this
    Can't use string ("IP,Partition,PartitionSize,Parti") as an ARRAY ref 
+while "strict refs" in use at ./psfile.pl line 39.