Changeset 301
- Timestamp:
- 01/14/11 01:55:19 (13 years ago)
- Location:
- tools/trunk
- Files:
-
- 1 added
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
tools/trunk/MANIFEST
r69 r301 3 3 MANIFEST 4 4 README 5 t/Sophie-IrcBot.t 6 lib/Sophie/ IrcBot.pm5 bin/sophie-rpm 6 lib/Sophie/Client.pm -
tools/trunk/Makefile.PL
r69 r301 4 4 # the contents of the Makefile that is written. 5 5 WriteMakefile( 6 NAME => 'Sophie ::IrcBot',7 VERSION_FROM => 'lib/Sophie/ IrcBot.pm', # finds $VERSION6 NAME => 'Sophie-tools', 7 VERSION_FROM => 'lib/Sophie/Client.pm', # finds $VERSION 8 8 PREREQ_PM => {}, # e.g., Module::Name => 1.1 9 9 ($] >= 5.005 ? ## Add these new keywords supported since 5.005 10 (ABSTRACT_FROM => 'lib/Sophie/IrcBot.pm', # retrieve abstract from module 11 AUTHOR => 'Olivier Thauvin <olivier@localdomain>') : ()), 10 (AUTHOR => 'Olivier Thauvin <nanardon@nanardon.zarb.org>') : ()), 11 EXE_FILES => [ qw( 12 bin/sophie-rpm 13 )], 12 14 ); -
tools/trunk/bin/sophie-rpm
r299 r301 9 9 use File::Temp; 10 10 11 =head1 NAME 12 13 sophie-rpm - Tools to check rpms over Sophie Website 14 15 =cut 16 17 =head1 SYNOPSYS 18 19 sophie-rpm [-c configfile] [--proxy proxy] RPM1 [RPM2 [...]] 20 21 =cut 22 11 23 my $distrib = {}; 24 25 =head1 OPTIONS 26 27 =over4 28 29 =item -c configfile 30 31 Use this config instead default one (C<~/.sophie.conf>) 32 33 =item --proxy proxy 34 35 Use this proxy to connect sophie's web site. The proxy must given as an url 36 like C<http://proxy:8080/> 37 38 =back 39 40 =cut 41 42 =item HEAD1 config file 43 44 The configuration must look like something like this 45 46 # url http://sophie.zarb.org/rpc 47 # proxy http://nanardon.zarb.org:3128/ 48 <distrib> 49 distribution Mandriva 50 release cooker 51 arch x86_64 52 </distrib> 53 54 =over 4 55 56 =item proxy URL 57 58 Optionnal proxy to use to connect to sophie website 59 60 =item url URL 61 62 The url of C<RPC> top method, default is C<http://sophie.zarb.org/rpc>. 63 64 =item distrib 65 66 The distribution for which rpms must be checked 67 68 =over 4 69 70 =item distribution 71 72 The distribution name 73 74 =item release 75 76 The release provided by this distribution 77 78 =item arch 79 80 The architecture for this distribution/release 81 82 =back 83 84 =back 85 86 =cut 12 87 13 88 GetOptions( … … 16 91 'l=s' => \my $login, 17 92 'p=s' => \my $pass, 18 't=s' => \my $type,19 'd=s' => \my @options,20 93 'proxy' => \my $proxy, 21 94 … … 137 210 } 138 211 212 213 =head1 AUTHOR 214 215 Olivier Thauvin C<nanardon@nanardon.zarb.org> 216 217 =head1 SEE ALSO 218 219 L<http://sophie.zarb.org> 220 221 =head1 COPYRIGHT AND LICENSE 222 223 Copyright (C) 2010 by Olivier Thauvin 224 225 This library is free software; you can redistribute it and/or modify 226 it under the same terms as Perl itself, either Perl version 5.12.2 or, 227 at your option, any later version of Perl 5 you may have available. 228 229 =cut
Note: See TracChangeset
for help on using the changeset viewer.