From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more
1234567891011121314 # [[[ HEADER ]]]package RPerl::Test::SubroutineArguments::Package_00_Good;use strict;use warnings;use RPerl;our $VERSION = 0.001_000;# [[[ SUBROUTINES ]]]our void $empty_sub = sub { ( my number $foo ) = @_; return 1;};1; # end of package
# [[[ HEADER ]]]
package
RPerl::Test::SubroutineArguments::Package_00_Good;
use
strict;
warnings;
RPerl;
our
$VERSION
= 0.001_000;
# [[[ SUBROUTINES ]]]
void
$empty_sub
=
sub
{
(
my
number
$foo
) =
@_
;
return
1;
};
# end of package