UserFriendly.org Full Size version forwarder :)

[ash]

Category:

Fun/Entertainment

Description:

You hate having to load the small version of userfriendly for then to click on the link to the fullsize one? Well. This script forwards you directly to todays full size userfriendly strip :) But since userriendly doesn't update before 9 a.m in norway, i've inserted this little line: ($a[2]<9)&&$a[3]--; so that you'll be forwarded to yesterdays strip if it's not up yet. Change the 9 to your timezone :)

#!/usr/bin/perl
@a=localtime;
$a[4]++;$a[4]=~s/(\d)/0$1/;
$y=$a[5]+1900;
($Y=$y)=~s#(\d\d)(\d\d)#$2#;
($a[2]<9)&&$a[3]--;
(length($a[3])<2)&&($a[3]="0$a[3]");
($b=lc(localtime(time)))=~s/([\w]{3}\s){2}//;
($b=$1)=~s/\s//;
print("Location: http://www.userfriendly.org/cartoons/archives/${Y}${b
+}/${y}$a[4]$a[3].html\n\n");