[experiment]
percent=1
message=%d OK

##</code><code>##

%d OK

##</code><code>##

"%d OK"

##</code><code>##

use strict;
use warnings;
use Nagios::Plugin;
use Data::Dumper;
my $n=Nagios::Plugin->new(version=>1,usage=>"");
$n->add_arg("percent","",undef,0);
$n->add_arg("msg|message=s","",undef,0);
$n->getopts();
print Dumper $n->opts

##</code><code>##

$VAR1 = bless( { :
                 :
                 'msg' => '--percent',
                 'verbose' => 0,
                 'usage' => undef,
                 'percent' => undef,
                 :
               }, 'Nagios::Plugin::Getopt' );


##</code><code>##

$VAR1 = bless( { :
                 :
                 'percent' => 1,
                 'version' => undef,
                 'message' => '"%d OK"',
               }, 'Nagios::Plugin::Getopt' );

##</code><code>##

[experiment]
percent=1
message="%d" OK