my $string = 'kitten';
my $regex = join '\s*', split //, $string;
/$regex/;