in reply to perl file permissions

I use the following bash script to automate this task:
#!/bin/bash file=$1 if [ -e $file ] then vim $file else touch $file echo '#!'`which perl` > $file echo '' >> $file echo 'use strict;' >> $file echo 'use warnings;' >> $file echo '' >> $file chmod +x $file vim $file fi