as before, its because variable is never initialized, or its initialized to undef

my( $left, $right ) = undef =~ /(never)(match)/;
[download]

• uninitialized value in join or string
• Use of uninitialized value for file name
• Use of uninitialized value in numeric comparison (<=>) error