NAME

Package::Transporter::Generator::Potential::Argument_in_Name - Hardwire one argument in the name of the subroutine

SYNOPSIS

        #!/usr/bin/perl -W -T
        use strict;
        
        use Package::Transporter sub{eval shift}, sub {
                $_[0]->register_potential('::Argument_in_Name',
                        'FOR_ANY', 'calc_');
        };
        
        sub calc {
                my ($correction, $a, $b) = @_;
                return($a * $correction/100 + $b);
        };
        
        package Other;
        use Package::Transporter sub{eval shift};
        
        print calc_5(7, 8), "\n"; # sets $correction = 5
        #my $result = calc_5 7, 8; # error

        exit(0);

DESCRIPTION

A proof-of-concept for another option for configuring the argument list in proxy calls.

ANYTHING ELSE

Please see the documentation of the upstream package Package::Transporter.