$str =~ s/[^[:alpha:]]//g; #i isn't needed