Update authors lists
[claws.git] / tools / google_msgid.pl
1 #!/usr/bin/perl
2 my $browser   = 'mozilla';
3 my $google_id = 'http://groups.google.com/groups?as_umsgid';
4 $_ = <>;
5 chomp;
6 s/<|>//eg;
7 system("$browser '$google_id=$_' &");