File: google_msgid.pl

package info (click to toggle)
claws-mail 4.4.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 51,264 kB
  • sloc: ansic: 269,620; cpp: 19,478; xml: 11,545; sh: 6,285; perl: 2,767; makefile: 2,504; yacc: 2,471; python: 334; lex: 293; sed: 16
file content (7 lines) | stat: -rwxr-xr-x 169 bytes parent folder | download | duplicates (18) 
1
2
3
4
5
6
7
 
#!/usr/bin/perl
my $browser   = 'mozilla';
my $google_id = 'http://groups.google.com/groups?as_umsgid';
$_ = <>;
chomp;
s/<|>//eg;
system("$browser '$google_id=$_' &");