My git post-checkout hook

post-checkout.pl

#!/usr/bin/perl

# mkdir -p ~/.gittemplate/hooks
# git config --global init.templatedir ~/.gittemplate
#
# Save this script as ~/.gittemplate/hooks/post-checkout

use 5.010;
use strict;
use warnings;


#say "hooks/post-checkout: start";

my $origin_url = `git config remote.origin.url`;
chomp $origin_url;
#  git:repo
#  git@git:repo
#  ssh://git@git/repo
my $host_regex = XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX;
exit unless $origin_url =~ m{^(?:$host_regex:|ssh://$host_regex/)[a-zA-Z0-9]};

my $user_email = `git config user.email`;
chomp $user_email;
if ($user_email ne "YYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYY") {
    $user_email =  "YYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYY";
    # Configuration locale
    system qw<git config user.email>, $user_email;
    say "hooks/post-checkout: user.email switched to <$user_email>";
}