willwillis

#!/usr/bin/perl
use Date::Calc qw/:all/;
# 
# posting some more scripts
# from back in the day
# 
# 
my %days_till = (
    Graduation   => Delta_Days( Today(), 2007, 12, 16 ),
    MyLastFinal  => Delta_Days( Today(), 2007, 12, 8 ),

willwillis

#!/usr/bin/perl
# 
# This is a script I used (many years ago) to 
# have my paypal balanced texted to me. Srlys doubt it
# still works - and there's prolly an api to call now :/
# (circa early 2000's)
# 
use strict;
use warnings;