<%once> ++ $::sub_count; my $count; <%perl> ++ $::local_count; <% ++ $count; %>