From e62a8c4dd2a9be297f2f4961c9c643e68b8b3bce Mon Sep 17 00:00:00 2001 From: Guilhem Moulin Date: Thu, 1 Mar 2012 18:59:39 +0100 Subject: warning pragma --- videodb-check.pl | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'videodb-check.pl') diff --git a/videodb-check.pl b/videodb-check.pl index 4a169d0..d998af4 100755 --- a/videodb-check.pl +++ b/videodb-check.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 @@ -8,12 +8,14 @@ $VERSION = "0.1, 27 November 2011"; +use warnings; +use strict; + use DBI; use Pod::Usage; use File::Spec::Functions; use Cwd; use Env qw /HOME/; -use strict; ################################################################################ -- cgit v1.2.3