> mixiでｿｰｽ丸見えだったのか
> http://strange.kir.jp/stored/qwup6510.zip

#------------------------------------------------------------------------------
# MAIN
#------------------------------------------------------------------------------
my $mn = Boofy::Main::->new();
my $cgi = $mn->load_cgi(); 
my $lg = Boofy::Login::->new($cgi);

## Block shit from 2_ch
my %v = $cgi->Vars();
if (%v) {
    my $tpl = $mn->load_tpl("header.tmpl");
    $mn->show_header();
    $mn->show_alert();
    print $tpl->output();
    exit;
}

(´ー｀)ﾆﾔﾆﾔ

参考：2006/02/10(金)14時26分41秒