Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re: Listening for Socket.IO events with WWW::Mechanize::Firefox

by Corion (Pope)
on Jan 02, 2013 at 09:25 UTC ( #1011235=note: print w/replies, xml ) Need Help??

in reply to Listening for Socket.IO events with WWW::Mechanize::Firefox

If you don't want to go the route of custom certificates and an SSL-stripping proxy as suggested by Anonymous Monk, I would simply inject my own callbacks into the page. There should be examples in MozRepl::RemoteObject and/or WWW::Mechanize::Firefox::Examples somewhere how to trigger a Perl callback from Javascript, but the general gist of it should be that you don't need to think about details:

my $socket_io_handlers = $mech->repl->expr('variable_that_handles_the_ +callbacks'); $socket_io_handlers->{on_chat} = sub { print " Got " . Dumper \@_; };

This approach won't handle callback chaining in a nice way. For that, you'll have to use a proper Javascript function and inject that instead:

my $create_tee = $mech->repl->declare(<<'JS'); function (next_handler, perl_handler) { next_handler.apply(arguments); perl_handler.apply(arguments); }; JS my $old_handler = $socket_io_handler->{ on_chat }; my $new_handler = $create_tee->( $old_handler, sub { print " + " . Dumper \@_ }); $socket_io_handler->{ on_chat } = $new_handler;

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1011235]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (6)
As of 2018-06-20 12:26 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (116 votes). Check out past polls.