$str =~ /(?<=^a)/;