my @array = map { qr{$_} } ('^abcd', 'cd[ef]g', 'cat$');