Help for this page

Select Code to Download


  1. or download this
    my ($LSV, $LSN) = $BE_temp =~ m/^\|\s(\w+_\d+)\s+\|\s+(\w+)\s+\|$/m;
    if ( $LSV =~ m/dsmgt_03_03/ ) {
    ...
    } else {
        print "LSV Fail\n";
    }
    
  2. or download this
    Use of uninitialized value $LSV in pattern match (m//) at C:\Users\civ
    +ey\Documents\Perl\SDM401-LDAP_Config.pl line 405, <STDIN> line 2.
    LSV Fail