perl中读取外部文件

打开一个在电脑G盘111文件下的一个文件

 

#!/usr/bin/perl -w  use strict;

open(IN,"G:/111/mylove.txt");

while($line=<IN>){
        print $line;
}