Parent Directory | Revision Log | Patch
revision 788 by dpavlin, Sun Dec 10 12:56:59 2006 UTC | revision 791 by dpavlin, Tue Jan 30 18:21:17 2007 UTC | |
---|---|---|
# | Line 21 use Exporter 'import'; | Line 21 use Exporter 'import'; |
21 | split_rec_on | split_rec_on |
22 | ||
23 | get set | get set |
24 | count | |
25 | /; | /; |
26 | ||
27 | use warnings; | use warnings; |
# | Line 41 WebPAC::Normalize - describe normalisato | Line 42 WebPAC::Normalize - describe normalisato |
42 | ||
43 | =head1 VERSION | =head1 VERSION |
44 | ||
45 | Version 0.25 | Version 0.26 |
46 | ||
47 | =cut | =cut |
48 | ||
49 | our $VERSION = '0.25'; | our $VERSION = '0.26'; |
50 | ||
51 | =head1 SYNOPSIS | =head1 SYNOPSIS |
52 | ||
# | Line 1289 sub get { | Line 1290 sub get { |
1290 | return $v; | return $v; |
1291 | } | } |
1292 | ||
1293 | =head2 count | |
1294 | ||
1295 | if ( count( @result ) == 1 ) { | |
1296 | # do something if only 1 result is there | |
1297 | } | |
1298 | ||
1299 | =cut | |
1300 | ||
1301 | sub count { | |
1302 | warn "## count ",dump(@_),$/; | |
1303 | return @_ . ''; | |
1304 | } | |
1305 | ||
1306 | # END | # END |
1307 | 1; | 1; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |