[Expectperl-discuss] 'interact -o -re <pattern> {...} ' in expectperl?

[Albrecht B. <al...@nm...>]

Hello,

is there a similar mechnism in expectperl for using the following expect 
code:

--- expect code snippet ---
interact {
    -o
    -re "..." { send "..."}
}
----

The Expect.pm-documentation for $object->interact( "\*FILEHANDLE, 
$escape_sequence") states "Interaction ceases when $escape_sequence is 
read from FILEHANDLE, not $object. $object's listen group will consist 
solely of \*FILEHANDLE for the duration of the interaction."

So, my question in other words: is there any possibility to cease 
interaction based on a (regex) pattern, read from $object? Any 
workaround, if not possible using interact()?

Thanks in advance,
Albrecht