$string = 'abcd';
$regex = join '.*?', split //, $string;
$sequence = 'xxxxxaxxxxxxbxxxxxcxxxxdxxxxx';
if($sequence =~ /$regex/s) {
    printf "I found a match, at offset %d and with total length %d\n", $-[0], $+[0]-$-[0];
}