From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more
1234567891011121314 # [[[ PREPROCESSOR ]]]# <<< PARSE_ERROR: 'ERROR ECOPAPL02' >>># <<< PARSE_ERROR: 'Misplaced _ in number' >>># [[[ HEADER ]]]use RPerl;package RPerl::Test::LiteralNumber::Package_48_Bad_01;use strict;use warnings;our $VERSION = 0.001_000;sub empty_sub { { my number $RETURN_TYPE }; return 23_456._2; }1; # end of package
# [[[ PREPROCESSOR ]]]
# <<< PARSE_ERROR: 'ERROR ECOPAPL02' >>>
# <<< PARSE_ERROR: 'Misplaced _ in number' >>>
# [[[ HEADER ]]]
use
RPerl;
package
RPerl::Test::LiteralNumber::Package_48_Bad_01;
strict;
warnings;
our
$VERSION
= 0.001_000;
sub
empty_sub { {
my
number
$RETURN_TYPE
};
return
23_456._2; }
1;
# end of package