Perl script for asterisk status. Please edit the script and change the path to your asterisk pid file.
