hier hängt auch noch ein fehlerquelle:
($was,$url) = split(/\|/ , $parameter);
wenn in die var $was nicht "count" oder "show" gesplittet wird, passiert gar nichts, weil dann die sub's nicht aufgerufen werden.
ruftst du den script entsprechend auf: zb. count.pl?count|www.url.de
statt | ( tab ) sollte man überlicherweise & nehmen