my $letter = substr $string, 0, 1 [download]
In reply to Re: String extraction by FunkyMonk in thread String extraction by matthxx