or download this
my $session = q{1678f192860fb3850d27244c76b704b1&action=select&salesma
+n=015&salesman=020&salesman=030&salesman=035&salesman=045&salesman=05
+0&salesman=065&salesman=075&salesman=090&salesman=095&salesman=100&sa
+lesman=105&salesman=110&salesman=120&salesman=900&salesman=911&salesm
+an=998&year=2003&go=GO};
my %hash;
push @{$hash{session}}, $session =~ /salesman=(\d+)/g;