Select Code to Download

#!/usr/bin/perl

...

$mech->get("http://dl.opensubtitles.org/en/download/file/1953419460");
$mech->save_content("result.srt");