(my $server, my $dir, my $type) = split if !/^#/

##</code><code>##

print if !/^#/