Help for this page

Select Code to Download


  1. or download this
    if (defined($$l_Name_ref)) {
  print STDERR "1 $$l_Name_ref\n" if (defined($$l_Name_ref));
...
    print STDERR "3 $l_Name_ref\n";
    print STDERR "4 $$l_Name_ref\n";
    ...
  2. or download this
    1 MMP_MODULES
2 SCALAR(0x7f80ab361968)
...
1 TMP_MODULE_HASH
2 SCALAR(0x7f80ad04ed68)
3 SCALAR(0x7f80ad04ed68)
  3. or download this
    Use of uninitialized value in concatenation (.) or string at myfile.pm
+ line 1061.
  4. or download this
    if (defined($$l_Name_ref)) {
  my $l_Name = $$l_Name_ref;
  if ($l_Name =~ /^[a-zA-Z]\w+$/) {
    ...