if ( &check_for_valid_conf($config_file) ) { my (@class, @rules) = &parse_conf($config_file); print "class has $#class elements and rules has $#rules elements\n"; print join("\n",@class),"\n"; } sub parse_conf { ... return(@class,@ind_rules); }