つまんなくてごめんなさい。
0 2 * * * /Users/danjou/local/mounero.pl#!/usr/bin/env perl
use strict;
use warnings;
use WWW::Mechanize;
use Config::Pit;
my $config = pit_get('tumblr.com');
my $mech = WWW::Mechanize->new;
$mech->post(
'http://www.tumblr.com/login',
$config
);
$mech->get('http://www.tumblr.com/reblog/213795352/lH4qzi1B');
$mech->form_id('edit_post');
$mech->select('channel_id' => 'mounero');
#$mech->field('post[two]' => '');
$mech->click_button(number => 1);