my $string = '( | No Qualifier | | '; my $start = index( $string, '|' ); # find first pipe position my $end = index( $string, '|', $start+1 ); # find next pipe position my $qualifier = substr( $string, $start, $end-$start+1 ); # extract