6 ##my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime;
7 my $date = `date +%m%d`;
10 if (-e "$ENV{HOME}/.emacs.d" ) {
11 say "~/.emacs.d folder already exists, rename as ~/.emacs.d_bak_$date";
12 ! system "mv", "$ENV{HOME}/.emacs.d", "$ENV{HOME}/.emacs.d_bak_$date" or die;
15 ## link emacs.d folder
16 ! system "ln", "-s", "$ENV{HOME}/dotfiles/emacs.d", "$ENV{HOME}/.emacs.d" or die;