Select Code to Download

#!/usr/bin/perl -w
#distlog.pl
...
IO::File->open(">$name.info") || die "Cannot create $name.info: $!";
        print $handle $_;
}

Error:
Can't use string ("IO::File") as a symbol ref while "strict refs" in u
+se at /usr/lib64/perl5/5.8.8/x86_64-linux-thread-multi/IO/File.pm lin
+e 188, <> line 1.