terminalfool

#!/usr/bin/perl

use strict;
use Proc::Simple;
use Proc::Killall;
use Time::localtime;
use LWP::Simple qw($ua getstore);
$ua->agent("");
use Mozilla::CA;

terminalfool

#!/usr/bin/perl

use strict;
use Time::localtime;
use LWP::Simple qw($ua getstore);
$ua->agent("");
use Mozilla::CA;

#use Data::Dumper;

terminalfool

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
   <key>Label</key>
<string>app.dns.adblock</string>
<key>ProgramArguments</key>
<array>
  <string>/usr/local/bin/adblock.pl</string>
</array>

terminalfool

#!/usr/bin/env perl

package App::DDNS::Namecheap;

use strict;
use warnings;
use Exporter;
use LWP::Simple qw($ua get);
$ua->agent("");
use Mozilla::CA;

terminalfool

#!/usr/bin/perl

#otter.pl v0.11 7/1/16
#scan and delete urchin cookies from mozilla cookie db

use strict;
use warnings;

use File::Monitor;
use File::Path qw(remove_tree);

terminalfool

Keybase proof

I hereby claim:

• I am terminalfool on github.
• I am terminalfool (https://keybase.io/terminalfool) on keybase.
• I have a public key whose fingerprint is 0067 C386 4B27 C170 6520 8790 D56A A350 432B 6928

To claim this, I am signing this object: