--- a/password.pm	Tue Jul 31 10:46:37 2007 +0000
+++ b/password.pm	Fri Feb 21 11:56:39 2014 +0100
@@ -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;