perl几个文件操作例子（perl基本命令）全程干货

🌐 经济型：买域名、轻量云服务器、用途：游戏网站等《腾讯云》特点：特价机便宜适合初学者用点我优惠购买

🚀 拓展型：买域名、轻量云服务器、用途：游戏网站等《阿里云》特点：中档服务器便宜域名备案事多点我优惠购买

🛡️ 稳定型：买域名、轻量云服务器、用途：游戏网站等《西部数码》特点：比上两家略贵但是稳定性超好事也少点我优惠购买

#Open the ‘txt’ file for reading

open FH, ‘<‘, “$file_name.txt” or die “Error:$!n”; #Open the ‘txt’ file for writing. Creates the #file_name if it doesn’t already exist #and will delete/overwrite a pre-existing file of the same name open FH, ‘>’, “$file_name.txt” or die “Error:$!n”;

#Open the ‘txt’ file for appending. Creates the #file_name if it doesn’t already exist

open FH, ‘>>’, “$file_name.txt” or die “Error:$!n”;

#Open the ‘txt’ file for a ‘read/write’. #Will not create the file if it doesn’t #already exist and will not delete/overwrite #a pre-existing file of the same name

open FH, ‘+<‘, “$file_name.txt” or die “Error:$!n”; #Open the ‘txt’ file for a ‘read/write’. Will create #the file if it doesn’t already exist and will #delete/overwrite a pre-existing file #of the same name open FH, ‘+>’, “$file_name.txt” or die “Error:$!n”;

#Open the ‘txt’ file for a ‘read/append’. Will create #the file if it doesn’t already exist and will #not delete/overwrite a pre-existing file #of the same name

open FH, ‘+>>’, “$file_name.txt” or die “Error:$!n”;