X-Git-Url: https://git.draconx.ca/gitweb/mpdhacks.git/blobdiff_plain/b0f5f5741b234174958ade58a6e884df8b6b00e4..9913010f15f1fb7a3f331e655592fa6fc2807a12:/mpdexec.pl

diff --git a/mpdexec.pl b/mpdexec.pl
index 496c558..4d25ead 100755
--- a/mpdexec.pl
+++ b/mpdexec.pl
@@ -40,10 +40,10 @@ EOF
 }
 
 sub print_usage {
-	my $fh = $_[1] // *STDERR;
+	my ($fh) = (@_, *STDERR);
 
 	print $fh "Usage: $0 [options] [command ...]\n";
-	print "Try $0 --help for more information.\n" unless (@_ > 0);
+	print $fh "Try $0 --help for more information.\n" unless (@_ > 0);
 }
 
 sub print_help {