Visualization perl script added to the repo