compiling perl - show