同步git修改文件到远端服务器脚本
1 #!/usr/bin/perl -w 2 @files=`git status -s` ; 3 @sync_files = (); 4 5 foreach (@files) 6 { 7 $file = substr($_,3); # 固定前2个字符为状态 + 1个空格 8 chomp($file); 9 push(@sync_files, $file); 10 } 11 12 $cmd = "scp -r "; 13 foreach $file (@sync_files) 14 { 15 $cmd = $cmd.$file." "; 16 } 17 18 $cmd = $cmd.' ops@192.168.1.1:/home/ops/'; 19 20 print $cmd."\n"; 21 system($cmd);
【推荐】还在用 ECharts 开发大屏?试试这款永久免费的开源 BI 工具!
【推荐】国内首个AI IDE,深度理解中文开发场景,立即下载体验Trae
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步