This line does not do what you think:The evaluation is in list context($Version is inside round parens), so a list of group matches is returned - as an example:my ($Version) = ($Notes->{NotesVersion} =~ /\s*(.*\S)\s*$/); ###()=>$Version now contains the number of matches. Probably one.
#!/usr/bin/perl use strict; use warnings; my $teststr = "ciao a tutti"; my ($sep) = ($teststr =~ /\w+ (\w+) \w+/); print "result: [$sep]\n"; __END__ result: [a]
Flavio (perl -e 'print(scalar(reverse("\nti.xittelop\@oivalf")))')
Don't fool yourself.In reply to Re^2: notes perl problem
by polettix
in thread notes perl problem
by cybär
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |