https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=33832 --- Comment #8 from David Cook <dcook@prosentient.com.au> --- (In reply to Marcel de Rooy from comment #7)
Seeing this: if ( $op eq 'cud-update' && $newpassword.defined and not @errors ) {
What is $newpassword.defined ?? Wondering why perl does compile that? Please explain.
It looks like a copy/paste error from the template toolkit where scalar values can have methods. It looks like Perl compiles it because "." is used to concatenate things together. It looks like $newpassword.defined is equivalent to $newpassword . defined $_ "Returns a Boolean value telling whether EXPR has a value other than the undefined value undef. If EXPR is not present, $_ is checked." https://perldoc.perl.org/functions/defined Yikes! -- You are receiving this mail because: You are watching all bug changes.