Help for this page

Select Code to Download


  1. or download this
    my $prefixSysDescr =   quotemeta 'system.sysDescr.0 : DISPLAY STRING- 
    +(ascii):';
    my $sysDescr       = 'system.sysDescr.0 : DISPLAY STRING- (ascii): fub
    +ar';
    ...
    print $sysDescr,$/;
    __END__
     fubar
    
  2. or download this
    $sysDescr =~ s/\Q$prefixSysDescr\E//;