fix #perl.pl channel rendering

... and of any other channels with dots in the name, really :-)