Can't locate object method "Open" via package "IO::Handle" (perhaps you forgot to load "IO::Handle"?) at C:\Data\Nirmal\perl\clearcase\tt.pl line 6.

##</code><code>##

###############################################
#!c:\perl\bin
use strict;

my $file="PCFD\.txt";

Open PFN, "<$file";

my @array = <PFN>;

Close PFN;

foreach (@array) {

    print();

}