ZoneMinder
/
zoneminder
mirror of https://github.com/ZoneMinder/zoneminder.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

autouse Data::Dumper

pull/815/head
Dmitry Smirnov 2015-04-16 15:42:56 +10:00
parent b0d98c6052
commit b0909a4c57
6 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scripts/zmtrack.pl.in
View File

@ -61,7 +61,7 @@ use constant SLEEP_TIME => 10000; # In microseconds
use ZoneMinder; use ZoneMinder;
use DBI; use DBI;
use POSIX; use POSIX;
use Data::Dumper; use autouse 'Data::Dumper'=>qw(Dumper);
use Getopt::Long; use Getopt::Long;
use autouse 'Pod::Usage'=>qw(pod2usage); use autouse 'Pod::Usage'=>qw(pod2usage);
use Time::HiRes qw( usleep ); use Time::HiRes qw( usleep );

2
scripts/zmtrigger.pl.in
View File

@ -85,7 +85,7 @@ push( @connections,
use DBI; use DBI;
#use Socket; #use Socket;
use Data::Dumper; use autouse 'Data::Dumper'=>qw(Dumper);
use POSIX qw( EINTR ); use POSIX qw( EINTR );
use Time::HiRes qw( usleep ); use Time::HiRes qw( usleep );

2
scripts/zmupdate.pl.in
View File

@ -76,7 +76,7 @@ use POSIX;
use DBI; use DBI;
use Getopt::Long; use Getopt::Long;
use autouse 'Pod::Usage'=>qw(pod2usage); use autouse 'Pod::Usage'=>qw(pod2usage);
use Data::Dumper; use autouse 'Data::Dumper'=>qw(Dumper);
use constant EVENT_PATH => ($Config{ZM_DIR_EVENTS}=~m|/|)?$Config{ZM_DIR_EVENTS}:($Config{ZM_PATH_WEB}.'/'.$Config{ZM_DIR_EVENTS}); use constant EVENT_PATH => ($Config{ZM_DIR_EVENTS}=~m|/|)?$Config{ZM_DIR_EVENTS}:($Config{ZM_PATH_WEB}.'/'.$Config{ZM_DIR_EVENTS});

2
scripts/zmvideo.pl.in
View File

@ -63,7 +63,7 @@ use bytes;
@EXTRA_PERL_LIB@ @EXTRA_PERL_LIB@
use ZoneMinder; use ZoneMinder;
use DBI; use DBI;
use Data::Dumper; use autouse 'Data::Dumper'=>qw(Dumper);
use POSIX qw(strftime); use POSIX qw(strftime);
use Getopt::Long qw(:config no_ignore_case ); use Getopt::Long qw(:config no_ignore_case );
use autouse 'Pod::Usage'=>qw(pod2usage); use autouse 'Pod::Usage'=>qw(pod2usage);

2
scripts/zmwatch.pl.in
View File

@ -57,7 +57,7 @@ use constant START_DELAY => 30; # To give everything else time to start
use ZoneMinder; use ZoneMinder;
use POSIX; use POSIX;
use DBI; use DBI;
use Data::Dumper; use autouse 'Data::Dumper'=>qw(Dumper);
$| = 1; $| = 1;

4
scripts/zmx10.pl.in
View File

@ -65,7 +65,7 @@ use POSIX;
use Socket; use Socket;
use Getopt::Long; use Getopt::Long;
use autouse 'Pod::Usage'=>qw(pod2usage); use autouse 'Pod::Usage'=>qw(pod2usage);
use Data::Dumper; use autouse 'Data::Dumper'=>qw(Dumper);
use constant SOCK_FILE => $Config{ZM_PATH_SOCKS}.'/zmx10.sock'; use constant SOCK_FILE => $Config{ZM_PATH_SOCKS}.'/zmx10.sock';
@ -169,7 +169,7 @@ use POSIX;
use DBI; use DBI;
use Socket; use Socket;
use X10::ActiveHome; use X10::ActiveHome;
use Data::Dumper; use autouse 'Data::Dumper'=>qw(Dumper);
our $dbh; our $dbh;
our $x10; our $x10;