Perl 将字符串保存到文件_Perl

Perl 将字符串保存到文件

perl

Perl 将字符串保存到文件,perl,Perl,当我将一个字符串保存到一个文件中，然后从同一个文件重新加载它时，它的行为与原始字符串不同看起来第一个带有硬编码ip地址的代码可以工作，但是第二个我写入文件然后再读回的代码不能工作。如果我在从文件加载后打印$ip，它看起来是一样的 $ip=“100.10.100.1”； $port=1337；套接字（S、PF_INET、SOCK_流、getprotobyname（“tcp”）；连接（S，sockaddr_in（$port，inet_aton（$ip））； $ip=“100.10.100.1

当我将一个字符串保存到一个文件中，然后从同一个文件重新加载它时，它的行为与原始字符串不同

看起来第一个带有硬编码ip地址的代码可以工作，但是第二个我写入文件然后再读回的代码不能工作。如果我在从文件加载后打印$ip，它看起来是一样的

$ip=“100.10.100.1”；
$port=1337；
套接字（S、PF_INET、SOCK_流、getprotobyname（“tcp”）；
连接（S，sockaddr_in（$port，inet_aton（$ip））；

$ip=“100.10.100.1”；
my$filename='c:\\tmp\\ip.txt'；
打开（我的$fh，“>”，$filename）；
打印$fh“$ip”；
收盘价$fh；
open（my$fh，OK），perl似乎是使用-T cmd line选项运行的，这意味着它在“污染模式”下运行，并且不信任从文件读取的数据
将错误打印到文件时，我看到一条警告
“使用-T开关运行时，connect中的依赖关系不安全”
感谢您提供的提示！
请在从文件中读取后提供使用Devel:：Peek qw（Dump）；…Dump$ip；
的输出。-作为基本的健全性检查，将通常的使用strict；使用警告；使用autodie；
添加到程序中，看看这是否揭示了隐藏的问题。您会怎么做“它的行为与原始字符串不同"意思是？你到底看到了什么意外行为？@DaveCross-第一个代码段成功连接。第二个代码段中，我没有连接。我看不到脚本的输出，只向file@daxim-我看不到程序的标准输出和错误。当我尝试在常规perl环境中运行脚本时可以看到输出，它工作并连接successfully@tom，将STDERR重定向到一个文件：open*STDERR，“>>”，“/tmp/STDERR.log”；