#!perl -w use strict; use vars qw($type $field); $type = "rss"; require 't/12-multi-categories.base';