--- a/password.pm	Fri Nov 25 15:29:45 2011 +0100
+++ b/password.pm	Mon Nov 28 09:49:28 2011 +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;