Filtrere ord ud i $1, $2 etc.

[David List <sslug@sslug>]

Er det muligt i eet hug at filtrere ord ud i $1, $2 etc.?

Jeg prøver med det her, men det virker i hvert fald ikke:

my $var = "That is not it";
my @matches = $var =~ m/\b(\w+)\b/g;
print "matches are ";
print join(",", @matches);
print "\n";
print "test is ";
print $var, "\n";
print "\$1 is ", $1, "\n";
print "\$2 is ", $2, "\n";
print "\$3 is ", $3, "\n";
print "\$4 is ", $4, "\n";
print "\$5 is ", $5, "\n";

-- 
Med venlig hilsen / Best regards
David List