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: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |