Grammar

bin/mkexec.pl

@@ -12,7 +12,7 @@ my $DEFAULT_MODE = 0755;
 my $name = shift or usage;
 my $type = ($ARGV[0] ? shift : guesstype $name);
 
-my $bang = {
+my $bangs = {
     pl   => `which perl`,
     sh   => `which sh`,
     py   => `which python`,
@@ -21,7 +21,7 @@ my $bang = {
     bc   => `which bc`
 };
 
-my $template = {
+my $templates = {
     pl   => "use strict;\nuse warnings;\n",
     py   => "if __name__ == '__main__':\n"
 };
@@ -34,7 +34,7 @@ $cmds->{editor}->{test} = "editor --version 2>/dev/null";
 $cmds->{editor}->{run}  = "editor '%s'";
 
 
-if (exists $bang->{$type}) {
+if (exists $bangs->{$type}) {
     -e $name || mkexec $name, mkbody($type);
     chmod $DEFAULT_MODE, $name;
     launch_editor $name;
@@ -56,8 +56,8 @@ sub guesstype {
 sub mkbody {
     my $type = shift;
     my $tmpl = "";
-    $tmpl .= $template->{$type} if exists $template->{$type};
-    return sprintf "#!%s\n%s\n", $bang->{$type}, $tmpl;
+    $tmpl .= $templates->{$type} if exists $templates->{$type};
+    return sprintf "#!%s\n%s\n", $bangs->{$type}, $tmpl;
 }
 
 sub mkexec {