Ptouch

#!/bin/bash

#**************************#
# Name: ptouch             #
# Version: 1.0             #
# Author: Kevin M. Johsnon #
#**************************#

#-------------#--------------------------------------------#
#  Change Log |                                            |
#-------------#--------------------------------------------#
# Date        # Change Description                         |
#-------------#--------------------------------------------#
# 2011-05-21  | Original utility creation.                 |
#-------------#--------------------------------------------#

if [ -e $1 ]
then 
   echo "The file $1 already exists. Launching vim." ;
   sleep 2;
   vim $1;
   exit;
fi

perl=`which perl`;

echo "#!$perl" > $1;
chmod u+x $1;
vim $1;