1 files changed, 5 insertions, 3 deletions
diff --git a/videoadd.pl b/videoadd.pl
index a6b0ed3..5ad6462 100755
--- a/videoadd.pl
+++ b/videoadd.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w -CAL
+#!/usr/bin/perl -CAL
 
 # This program is free software. It comes without any warranty, to the
 # extent permitted by applicable law. You can redistribute it and/or
@@ -9,6 +9,10 @@
 
 $VERSION = "0.3, 01 March 2012";
 
+use warnings;
+use strict;
+use utf8;
+
 use Getopt::Long qw/:config noauto_abbrev no_ignore_case
                             gnu_compat bundling permute nogetopt_compat
                             auto_version auto_help/;
@@ -21,8 +25,6 @@ use File::Spec::Functions;
 use File::Copy qw /move/;
 use Env qw /HOME/;
 use Switch qw /Perl6/;
-use utf8;
-use strict;
 
 ################################################################################