Help for this page

Select Code to Download


  1. or download this
    $qname1 = join ".",(split(/\./, $string))[2,3,4];
    
  2. or download this
    $qname1 = join ".",(split(/\./, $string))[-3,-2,-1];