| version 1.22, 2007/11/02 03:36:01 |
version 1.23, 2010/02/25 17:54:13 |
|
|
| #!/usr/bin/perl |
#!/usr/bin/perl |
| # -T |
# -T |
| #$RedRiver: MakeTorrents.pl,v 1.21 2006/11/06 23:17:59 andrew Exp $ |
#$RedRiver: MakeTorrents.pl,v 1.22 2007/11/02 02:36:01 andrew Exp $ |
| use strict; |
use strict; |
| use warnings; |
use warnings; |
| use diagnostics; |
use diagnostics; |
|
|
| |
|
| print "Creating $torrent\n"; |
print "Creating $torrent\n"; |
| |
|
| $comment .= "Created by andrew fresh (andrew\@mad-techies.org)\n" . |
$comment .= "Created by andrew fresh (andrew\@afresh1.com)\n" . |
| "http://OpenBSD.somedomain.net/"; |
"http://OpenBSD.somedomain.net/"; |
| |
|
| eval { btmake($torrent, $comment, \@good_files); }; |
eval { btmake($torrent, $comment, \@good_files); }; |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to MakeTorrents.pl CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / openbsd / OpenBSDTorrents