Filehandle References : file handle « File « Perl

1.	Array
2.	CGI
3.	Class
4.	Data Type
5.	Database
6.	File
7.	GUI
8.	Hash
9.	Language Basics
10.	Network
11.	Regular Expression
12.	Report
13.	Statement
14.	String
15.	Subroutine
16.	System Functions
17.	Win32
18.	XML

Perl » File » file handle

Filehandle References

    



#!/bin/perl

open(README, "/etc/passwd") || die;



&readit(\*README);     # Reference to a typeglob



sub readit {

      my ($passwd)=@_;

      print "\$passwd is a $passwd.\n";

      while(<$passwd>){

         print;

      }

}



seek(README,0,0) || die "seek: $!\n"; # Reset back to begining of job

Related examples in the same category

1.	Using file handle variable
2.	Select a file handle
3.	Pass file handle reference in a the form of '*FILEHANDLE{IO}'
4.	Pass file handle reference to a subroutine
5.	Pass file handle to stat function
6.	Passing Filehandles by Reference
7.	Passing file handles to functions
8.	Split a file handle containing array
9.	undef file handle
10.	defined lines in a file
11.	Using a scalar variable to store a file variable name.
12.	Using while loop to read content
13.	Redirects the standard output and standard error files.
14.	To write to a file:
15.	Passing file name to functions

java2s.com | Contact Us | Privacy Policy

All other trademarks are property of their respective owners.