Select Code to Download

# This is the URL that streams alerts such as motion detection. Docume
+ntation at goo.gl/S38ZQq
my($url) = "http://".$user.":".$password."@".$ip.":".$port."/ISAPI/Eve
+nt/notification/alertStream";
...

Couldn't open http://user:password@10.1.10.23:80/ISAPI/Event/notificat
+ion/alertStream:
No such file or directory at /usr/local/share/perl/5.18.2/XML/Parser/P
+erlSAX.pm line 146.

#!/usr/bin/perl 

...
    print "Event: " . $eventType . "\n";
    $twig->purge;                             # delete the twig so far
+. Not sure if this is needed.
}