File: argv.pl

package info (click to toggle)
libmoosex-app-perl 1.41-2
  • links: PTS, VCS
  • area: main
  • in suites: bullseye, sid
  • size: 764 kB
  • sloc: perl: 4,004; makefile: 2
file content (16 lines) | stat: -rwxr-xr-x 262 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#!/usr/bin/env perl

use strict;
use warnings;
use 5.010;
use FindBin qw();
use lib ("$FindBin::Bin/../lib");

use MooseX::App::ParsedArgv;
use Data::Dumper;

my $inst = MooseX::App::ParsedArgv->instance();
say Dumper($inst);

$inst->options;
say Dumper($inst);