#!/usr/bin/env perl
# [[[ PREPROCESSOR ]]]
# <<< GENERATE_ERROR: "P187b, CODE GENERATOR, ABSTRACT SYNTAX TO" >>>
# [[[ HEADER ]]]
use RPerl;
use strict;
use warnings;
our $VERSION = 0.001_000;
# [[[ CRITICS ]]]
## no critic qw(ProhibitUselessNoCritic ProhibitMagicNumbers RequireCheckedSyscalls) # USER DEFAULT 1: allow numeric values & print operator
# [[[ INCLUDES ]]]
use RPerl::Test::Reserved::Class_06_Bad_00;
# [[[ SUBROUTINES ]]]
sub foo_subroutine_in_main {
{ my void $RETURN_TYPE };
print 'Howdy from foo_subroutine_in_main()...', "\n";
return;
}
# [[[ OPERATIONS ]]]
print 'Hello, World!', "\n";
foo_subroutine_in_main();
my RPerl::Test::Reserved::Class_06_Good $my_object = RPerl::Test::Reserved::Class_06_Good->new();
# NEED ANSWER: how to trigger ECOGEASxP187b???
$my_object->_Foo_method(23);