my($self, $cgi, $config) = @_; print < EOF .$not konqueror if($ENV{HTTP_USER_AGENT} !~ /Mac_PowerPC/ && (!exists $config->{disable_format_input} || !$config->{disable_format_input})) { print < EOF for(sort {$a <=> $b} keys %colours) { print "\n"; } print < EOF } .$end print < EOF