Fix "Use of uninitialized value $val in concatenation (.) or string at ./push.pl line 82."

2015-02-23 14:48:05 -07:00 · 2015-02-23 14:48:05 -07:00 · fb58df1b30
parent f4966009cd
commit fb58df1b30
1 changed files with 1 additions and 1 deletions
--- a/push.pl
+++ b/push.pl
@ -79,7 +79,7 @@ sub get_form_bits {
 			$val = $e->attr('value');
 		}
 		
-		$val = trim('' . $val);
+		$val = trim('' . ($val // ''));
 		$val =~ s!\r\n|\r!\n!g;
 		
 		$ret->{$name} = $val;