Help for this page

Select Code to Download


  1. or download this
       my ($Version) = ($Notes->{NotesVersion} =~ /\s*(.*\S)\s*$/);
    
       ###()=>$Version now contains the number of matches. Probably one.
    
  2. or download this
    #!/usr/bin/perl
    use strict;
    ...
    
    __END__
    result: [a]