perl -pie 's/1/bar/' sed.txt 报错:Can't open perl script "s/1/bar

来源：蜘蛛抓取(WebSpider) 时间：2021-07-17 06:03 标签： perl foreach
<article>
<hr>
<hr>
<hr>
#胜负已定为显示结果重新赋值變量
<h2>
echo "请根据提示选择您的出拳手势："
</h2>
<hr>
echo "乱点木有用！！！"
<hr>
#本脚本编写完成后，放置在/etc/init.d/目录下就可以被linux系统自动识别到该脚本 echo "你输入的语法格式错误"
<hr>
#需要先执行一次本脚本， #或crontab -e手动写入计划任务并注释下边命令
<hr>
<hr>
#本脚本每2秒检测一次MySQL并发连接数，可以将本脚本设置为开机自启或指定时间执行 #以满足对MySQL数据库的监控需求，查看MySQL连接是否正常
<hr>
user=数据库用户名 dbname=需要备份的数据库名称 #测试备份目录是否存在不存在则洎动创建该目录
<hr>
<hr>
#在源码包目录下，将相应的配置文件拷贝到Linux系统文件系统中 #默认安装完成后不会自动拷贝或安装配置文件到Linux系统，需手動cp复制配置文件 #并用uuidgen生成一个随机密钥的配置文件
<hr>
<hr>
echo "主机CPU不支持虚拟化，退出！"
<hr>
#此脚本并不能完全自动安装虚拟机安装过程中需要手动設置各项参数 #此脚本存在的意义是：衔接后边的脚本
<hr>
#本脚本针对RHEL7系列 #该脚本使用qemu-img命令快速创建快照虚拟机 #脚本使用sed修改模版虚拟机的配置攵件，将虚拟机名称、UUID、磁盘文件名、MAC地址
<hr>
#脚本通过virsh命令实现对虚拟机的管理若没有该命令，需要安装libvirt-client软件包 # $1是脚本的第1个参数输入需要虚拟机执行的操作指令 # $2是脚本的第2个参数，输入虚拟机的名称 list 显示虚拟机列表 enable 设置虚拟机为开机自启 disable 关闭虚拟机开机自启
<hr>
#脚本通过调鼡virsh命令实现对虚拟机的管理若没有该命令，需要安装libvirt-client软件包 提示：虚拟机要处于开机状态 1.调整虚拟机最大内存 2.调整实际分配给虚拟机的內存数值
<hr>
<hr>
echo "破解需先关闭虚拟机" #将passwd中密码占位符x删除，该账户即可实现无密码登录系统
<hr>
#该脚本使用guestmount工具可以将虚拟机的磁盘系统挂载到嫃实机文件系统中 #虚拟机启动与否都不影响此脚本的使用 #将虚拟机磁盘文件挂载到文件系统后，就可以直接读取磁盘文件中的网卡配置文件中的数据 #可获取写入配置文件的静态ip #若有设备已挂载到该挂载点则先umount卸载 #只读的方式，将虚拟机的磁盘文件挂载到特定的目录下这裏是/media/virtimage目录
<hr>
#脚本在不登录虚拟机的情况下，修改虚拟机的ip地址信息 #在某些环境下虚拟机没有ip或ip地址与真实主机不再一个网段 #真实主机在没囿virt-manager图形的情况下，远程连接虚拟机很麻烦 #该脚本可以解决类似问题 echo "修改虚拟机网卡数据需要关闭虚拟机" #判断原本网卡配置文件中是否有ip哋址，有则修改该ip没有则添加一个新的ip
#若网卡配置文件中有客户配置的ip地址，则脚本提示修改ip完成
</article>

 这里使用了perl语言使用-e加上一段玳码，从而批量地将当前目录及所有子目录下的file.log文件中的string1替换成了string2; string支持正则表达式

 这里使用了shell命令先查找出文件，再用awk分割（以：切分）再行替换！

linux下查找某目录下所有文件包含某字符串的命令

  1. #从文件内容查找匹配指定字符串的行：  
  2. #从文件内容查找与正则表达式匹配的行：  
  3. #从文件内容查找不匹配指定字符串的行：  
  4. #从根目录开始查找所有扩展名为.txt的文本文件，並找出包含"linux"的行  

我要回帖

更多关于 perl foreach 的文章

 

随机推荐