Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w
use strict;
my %h;
$h{okay} .= "Hello";  # No warning (for me, at least)
warn "----\n";
$h{warn}= $h{warn} . "Hello";  # Gives a warning
  2. or download this
    ----
Use of uninitialized value in concatenation (.) at line 6.