while ( <INPUT> )
{
    print OUTPUT qq{$1 ------> $2\n} if
       m{(?x) ^ AMQ8409 .*? ( QUEUE .*? \) ) .* ( RNAME .*? \) ) };
}