Perl中的文件句柄“只能用一次”

#!/usr/bin/perl use strict; use warnings; #test the open function open FH,"source.txt"; my $string1 = join '' , <FH>; print $string1; my $string2 = join '',<FH>; print $string2;#string2 内容为空