Passing file name to functions : file handle « File « Perl

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

Java

Java Tutorial

Java Source Code / Java Documentation

Illustrator Tutorials

GIMP Tutorials

C# / C Sharp

C# / CSharp Tutorial

C# / CSharp Open Source

SQL Server / T-SQL Tutorial

Oracle PL / SQL

Oracle PL/SQL Tutorial

Flash / Flex / ActionScript

VBA / Excel / Access / Word

XML

XML Tutorial

Microsoft Office PowerPoint 2007 Tutorial

Microsoft Office Excel 2007 Tutorial

Microsoft Office Word 2007 Tutorial

Perl » File » file handle

Passing file name to functions


    



#!/usr/bin/perl



use warnings;

use strict;



my $file = "yourFile.txt";



print( "\n\nAnd finally...\n" );

readfile( $file );



sub readfile

{

   my $file = shift();

   local *FILE;

   open( FILE, $file ) or die( "Error opening $file: $!" );

   print while ( <FILE> );

}

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.	Filehandle References
9.	Split a file handle containing array
10.	undef file handle
11.	defined lines in a file
12.	Using a scalar variable to store a file variable name.
13.	Using while loop to read content
14.	Redirects the standard output and standard error files.
15.	To write to a file:

www.java2java.com | Contact Us

All other trademarks are property of their respective owners.