Skip to content

Instantly share code, notes, and snippets.

View npkamen's full-sized avatar

npkamen

View GitHub Profile
@Robertof
Robertof / router-report.pl
Created May 22, 2015 17:31
This script generates a report containing various statistics about the Technicolor AG plus VDNT-S Router VDSL2 (also known as the "Telecom Italia VDSL/Fibra modem"). This is achieved by logging in to the router, requesting the various statistics page and summarising everything in a JSON file. The file is saved inside the REPORT_DIR, with the for…
#!/usr/bin/env perl
use autodie;
use strict;
use warnings;
use Digest::MD5 "md5_hex";
use File::Path ();
use File::Spec;
use Fcntl qw(:DEFAULT :flock);
use HTTP::Cookies;
use JSON::MaybeXS;