Help for this page

Select Code to Download


  1. or download this
    $COMNTS=~s/\'/''/g;
    $ADR_L1=~s/\'/''/g;        
    $ADR_L2=~s/\'/''/g;
    $ADR_L3=~s/\'/''/g;
    
  2. or download this
    foreach (qw(CLIENT RECORD CONTROL ...)) {
     $hash{$_} =$data[$idx++];
    }