diff --git a/mogupload b/mogupload
index 85015b4..99e4a4c 100755
--- a/mogupload
+++ b/mogupload
@@ -67,6 +67,7 @@ my $c = $util->getopts($usage, qw/class=s key=s file=s/);
 my $mogc = $util->client;
 
 my $filename = $c->{file};
+die "Must specify a file to upload with --file" unless $filename;
 
 my $fh;
 my $size = 0;