Rev 22 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 22 | Rev 23 | ||
---|---|---|---|
Line 12... | Line 12... | ||
12 | use warnings; |
12 | use warnings; |
13 | use strict; |
13 | use strict; |
14 | use utf8; |
14 | use utf8; |
15 | 15 | ||
16 | use FindBin; |
16 | use FindBin; |
17 | use lib "$FindBin::RealBin/../lib/"; |
17 | use lib "$FindBin::RealBin/../../lib/"; |
18 | use VGWhoIs::Core; |
18 | use VGWhoIs::Core; |
19 | 19 | ||
20 | if (defined $ARGV[0]) { |
20 | if (defined $ARGV[0]) { |
21 | $_ = join(' ', @ARGV); |
21 | $_ = join(' ', @ARGV); |
22 | } else { |
22 | } else { |