October 7 2020 Perl 7: An Opinionated Introduction Back

Suppressing Warnings (3)

        $ cat foo7a.pl 
        my ($i, $j, $k);
        $i = 'foo';
        {
            no warnings 'uninitialized';
            $k = $i . $j;
        }
        print "$k\n";


Home Last TOC Copyright © 2020 James E Keenan Back Next