/[webpac2]/trunk/lib/WebPAC/Normalize.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/lib/WebPAC/Normalize.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch 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;
Legend:
Removed from v.788  
changed lines
  Added in v.791
  ViewVC Help
Powered by ViewVC 1.1.26