Actually, it isn't so much code...
But {NULE} requested that I post it here. - tye (but my friends call me "Tye")my $attr= qr/(\w+)="([^"]+)"/; my $attrs= /<message(\s+$attr)*>/; my %hash; while( $attrs =~ /$attr/g ) { $hash{$1}= $2; } $hash{user_id}...
In reply to (tye)Re: PerlMonks modules 2.0
by tye
in thread PerlMonks modules 2.0
by ZZamboni
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |