Update takeScreenShot.pl

Ported from perl to bash because ewww Perl
Merge pull request #1 from braydenhull/patch-1

Update takeScreenShot.pl