135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

undef error when printing help

Browse Source
This commit is contained in:
Oliver Gorwits
2015-02-06 09:50:49 +00:00
parent 6ab12424e6
commit adf659a40d
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Netdisco/bin/netdisco-do
View File

@@ -74,7 +74,8 @@ $ENV{DBIC_TRACE} ||= $sqltrace;
Dancer::Logger->init('console', $CONFIG); Dancer::Logger->init('console', $CONFIG);
# get requested action # get requested action
(my $action = shift @ARGV) =~ s/^set_//; (my $action = shift @ARGV) =~ s/^set_//
if scalar @ARGV;
unless ($action) { unless ($action) {
pod2usage( pod2usage(