--- a/password.pm	Tue Jul 31 10:46:37 2007 +0000
+++ b/password.pm	Tue Apr 14 12:34:29 2015 +0200
@@ -5,9 +5,9 @@
     return undef if not -t;
 
     print $_[0];
-    system(stty => "-echo");
+    system( stty => "-echo" );
     my $ans = <STDIN>;
-    system(stty => "echo");
+    system( stty => "echo" );
     print "\n";
 
     chomp $ans;