"Fossies" - the Fresh Open Source Software Archive

Member "RPerl-5.002000/lib/RPerl/Test/TypeCheckingTrace/arrayref_bad_01.pl" (30 Aug 2019, 624 Bytes) of package /linux/misc/RPerl-5.002000.tar.gz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) Perl source code syntax highlighting (style: standard) with prefixed line numbers and code folding option. Alternatively you can here view or download the uninterpreted source code file. See also the last Fossies "Diffs" side-by-side code changes report for "arrayref_bad_01.pl": 4.001000_vs_4.002000.

    1 #!/usr/bin/env perl
    2 
    3 # [[[ PREPROCESSOR ]]]
    4 # <<< EXECUTE_ERROR: 'ERROR EAVRV01, TYPE-CHECKING MISMATCH' >>>
    5 # <<< EXECUTE_ERROR: 'arrayref value expected but non-arrayref value found' >>>
    6 # <<< EXECUTE_ERROR: 'in variable $input_1 from subroutine check_arrayref()' >>>
    7 
    8 # [[[ HEADER ]]]
    9 use RPerl;
   10 use strict;
   11 use warnings;
   12 our $VERSION = 0.000_001;
   13 
   14 # [[[ CRITICS ]]]
   15 ## no critic qw(ProhibitUselessNoCritic ProhibitMagicNumbers RequireCheckedSyscalls)  # USER DEFAULT 1: allow numeric values & print operator
   16 
   17 # [[[ INCLUDES ]]]
   18 use RPerl::Test::TypeCheckingTrace::AllTypes;
   19 
   20 # [[[ OPERATIONS ]]]
   21 check_arrayref('abcd');