8 my $home = $ENV{'HOME'};
9 my $zshDir = dirname abs_path(__FILE__);
10 my $zshrc = $zshDir . "/zshrc";
12 die "~/.zsh or ~/.zshrc exist. Backup them first.\n" if -e "$home/.zsh" or -e "$home/.zshrc";
14 print `ln -s $zshDir $home/.zsh`;
15 print `ln -s $zshrc $home/.zshrc`;
17 print "Done" unless $?;