Added GUI perl source file