[Catalyst] Catalyst advent calendar headers (aka cach ;') )

[raptor]

i found myself constantly browsing catalyst calendar, i was frustrated that I have to constantly gues what is where !! so i made this short script to extract the headlines..

#!/usr/bin/perl
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
$ua->agent("MyApp/0.1 ");

for my $day (6..24) {
        my $req = HTTP::Request->new(GET => "http://catalyst.perl.org/calendar/2005/$day");
        my $res = $ua->request($req);
        if ($res->is_success) {
                my $str = $res->content;
#               print $str;
                my ($header) = $str =~ /Catalyst Advent - Day \d+ - (.+?)</;
                print "$day. $header\n";
        }
}





# perl cach

6. Building PAR Packages
7. mod_perl Deployment
8. Don't Repeat Yourself
9. YAML, YAML, YAML!
10. Catalyst on shared hosting
11. Caching
12. <cite>Catalyst::Plugin::Subrequest
13. DBIx::Class as Catalyst Model
14. Authentication/Authorization
15. Sessions
16. Adding RSS feeds
17. FastCGI Deployment
18. Catalyst::View::TT
19. Testing
20. XMLRPC
21. A Catalyst Blog
22. Action Types
23. Static::Simple
24. Authorization


now i feel better :)