微网站价格表,怎么创建网站?,wordpress上传工具,工业设计网站哪个最好你有么有遇到过以下情况#xff1a;1 写的脚本忘记保存#xff0c;然后苦逼地再写一遍2 脚本不小心或者小心地删掉了#xff0c;但后来又发现很有用#xff0c;依然苦逼地再写一遍3 实验室的服务器炸了#xff0c;写的脚本全没了一般情况下#xff0c;第三种情况不会遇到…你有么有遇到过以下情况1 写的脚本忘记保存然后苦逼地再写一遍2 脚本不小心或者小心地删掉了但后来又发现很有用依然苦逼地再写一遍3 实验室的服务器炸了写的脚本全没了一般情况下第三种情况不会遇到但前两种你肯定遇到过当然你很少写脚本除外。如果遇到过前两种情况脚本的本地备份是不错选择原理利用 scp 实现远端和本地之间的文件传输在服务器中获取需要备份的文件目录并保存为log文件在本地使用scp获取这个log文件有了这个文件本地就知道需要备份哪些服务器的文件至本地了分别将获取log文件的脚本(位于服务器上)和执行备份的脚本(位于本地windows)的脚本设置定期执行(并且是有序的执行因为要先有log文件再进行备份)这样就实现了定期备份脚本的功能备份的文件夹用当日日期来命名如果你备份周期比较短可能会用到时分秒来命名了代码实现1 获取需要备份的文件目录该脚本位于服务器cat Backup_scripts.Rlibrary(optparse)option_list list(make_option(c(-f, --folder), type character, default NULL, help Folder to be backup))args if(is.null(args$folder))args$folder /sibcb2/bioinformatics2/wangjiahaosetwd(args$folder)cat(Collecting file path ...\n)Folders list.files(args$folder)xFolders Folders[Folders ! software]patterns c(\\.R$, \\.py$, \\.sh$, \\.wdl$)getFile res sapply(patterns, function(x) list.files(folder, x, recursive TRUE))return(paste0(folder, /, as.character(unlist(res))))}files as.character(unlist(sapply(xFolders, getFile)))date gsub(-, _, Sys.Date())out paste0(/sibcb2/bioinformatics2/wangjiahao/code/Backup/, date, .txt)write.table(files, file out, sep \n, quote FALSE, col.names FALSE, row.names FALSE)cat(Done!\n)用法由于脚本里面指定了默认的需要备份的路径所以可以直接运行。如果需要备份其他目录(例如 xxxx)直接在命令上加个参数就行了Rscript Backup_scripts.R --folder xxxx倒数第三行的out变量是log文件的保存位置需要自行修改懒得写成参数传递的形式了生成的log文件head 2020_12_10.txt wc -l 2020_12_10.txt288 2020_12_10.txtcode/CommonData/Build_ENSG.Rcode/function/buildTabix.Rcode/function/fmrNormalization.Rcode/function/Oncotator_FG.Rcode/function/PathwayEnrichment.Rcode/function/workflow.Rcode/myscript/Backup_scripts.Rcode/myscript/copy_script_v1.Rcode/myscript/copy_script_v2.Rcode/myscript/copy_script_v3.R本地获取log文件并执行备份该脚本位于本地cat Backup_scripts.Rsetwd(G:/Methylation/Backup)userName wangjiahaoserverIP xx.xx.x.xxdate gsub(-, _, Sys.Date())masterFolder paste0(getwd(), /, date)outFolder paste0(masterFolder, /, userName)suppressWarnings(dir.create(masterFolder))suppressWarnings(dir.create(outFolder))remoteLogFile paste0(/sibcb2/bioinformatics2/wangjiahao/code/Backup/, gsub(-,_,Sys.Date()), .txt)cmd paste0(scp , userName, , serverIP, :, remoteLogFile, , masterFolder)system(cmd)logFiles readLines(paste0(masterFolder, /, date, .txt))remoteFiles paste0(/sibcb2/bioinformatics2/wangjiahao/, logFiles)for(i in 1:length(remoteFiles)){remoteFile remoteFiles[i]localFolder paste0(outFolder, /, dirname(logFiles[i]))suppressWarnings(dir.create(localFolder, recursive TRUE))cmd paste0(scp , userName, , serverIP, :, remoteFile, , localFolder)system(cmd)}其中用户名和服务器IP需要自定义使用过程G:\Script\CMDRscript G:/Script/R/Backup_script.R2020_12_10.txt 100% 10KB 2.0MB/s 00:00[1] 0Build_ENSG.R 100% 394 55.3KB/s 00:00buildTabix.R 100% 961 235.9KB/s 00:00fmrNormalization.R 100% 889 174.2KB/s 00:00Oncotator_FG.R 100% 13KB 1.7MB/s 00:00PathwayEnrichment.R 100% 27KB 2.7MB/s 00:00workflow.R 100% 2118 518.4KB/s 00:00Backup_scripts.R 100% 933 228.4KB/s 00:00copy_script_v1.R 100% 2478 127.7KB/s 00:00copy_script_v2.R 100% 2466 65.3KB/s 00:00copy_script_v3.R 100% 1258 32.3KB/s 00:00....我不插网线传输速度也可以达到几M/s每个脚本啪的一下就传好了很快啊接下来实现自动备份定时任务设置需要同时设置本地和远程端的定时任务1 本地设置2 远程端设置在搜索目录的时候一定要把软件安装目录给去掉因为里面有很深的目录和很多的不是自己的脚本检索会消耗很多时间例如conda的目录。真的挺实用的~2021-06-08后来想到更简单且高效的方法终端服务器可以选择每一小时或两小时生成一个日志文件因此日志文件命名时要加上小时的单位(R语言strsplit(gsub([ -], _, Sys.time()), :)[[1]][1])。此外还有一个问题频繁的备份会产生很多日期相同小时不同的日志文件那么本地应该如何选择备份哪一个呢当然我们应该备份最近生成的那个日志文件对应的脚本但是本地电脑是不知道终端最近备份的是哪个日志文件的。解决办法也很简单同样的原理在终端每次备份时把备份的日期及小时保存在另外一个文件里这个文件的名字是可以唯一的因为它的内容每次都会被覆盖更新。这样我们在本地首先获取这个包含最近备份时间的日志文件内容又因为最近备份时间也是包含待备份脚本路径的日志文件的命名规则因此根据这个时间我们可以准确获取最近生成的那个文件路径日志文件并进行下一步的备份。之所以说更简单高效是因为之前是在电脑每次开机时自动备份一次后来想想这并不是最好的备份方法。现在我改进了备份方法因为之所以需要备份是因为你想避免你打开了终端软件(我使用的是Moba Xterm)连接服务器后对文件造成不可挽回的修改因此在打开Moba的时候进行备份显然是更有效的。实现这个想法也不难就是在打开Moba的同时进行服务器文件备份同样是使用windows的cmd功能start D:\MobaXterm\MobaXterm_Personal_20.6.exe Rscript G:/Script/R/Backup_script.R命名为start_Moba.cmd可以直接单击这个文件就可以同时实现打开Moba和文件备份 为了更方便可以将这个文件固定到任务栏或 Windows 自定义cmd命令。这样只会在打开Moba时才会进行备份而不是每次开机时都要弹出备份的窗口是不是前者更简单高效呢~
