{ my $code = sub { ... }; my @paths = qw( /myaction1/:param1 /myaction2/:param2 ); get($_, $code) for @paths; }