http://www.perlmonks.org?node_id=978438


in reply to Style - how to give class method call as parameter

Well, I don't want to use named parameters for such a simple task.
Why not? It's not like they're difficult to implement/use in Perl. You could even use a mix of positional (required) parameters and named (optional) parameters: 
my $success = $deployer->extend_order_lease( $order, $end_date, timeou
+t => $timeout );

[download]
There's also the option of making it an optional positional parameter, but that tends to be a bad idea, due to things getting messy if you add more optional parameters down the road. 
my $success = $deployer->extend_order_lease( $order, $end_date[, $time
+out] );

[download]

Replies are listed 'Best First'.
Re^2: Style - how to give class method call as parameter
by strat (Canon) on Jun 26, 2012 at 18:14 UTC

    Hello dsheroh,

    I don't want to use named parameters for this because it is just a simple call. I usually don't like mixed parameters, and with names for everything, I need to write something like:

    my $success = $self->do_method_with_timeout(
    timeout         => $timeout,
    object_or_class => $deployer
    method          => 'extend_order_lease',
    args            => [ $order, $end_date ],
);

    [download]

    In my eyes, too much code for a simple thing

    Best regards,
    perl -e "s>>*F>e=>y)\*martinF)stronat)=>print,print v8.8.8.32.11.32"

[reply]
[d/l]

In Section Seekers of Perl Wisdom