Opens two files and copies one into another. : Open file « 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

Java Source Code / Java Documentation

Java Open Source

Jar File Download

Photoshop Tutorials

Flash Tutorials

3ds-Max Tutorials

Illustrator Tutorials

C# / CSharp Tutorial

C# / CSharp Open Source

ASP.NET Tutorial

JavaScript DHTML

JavaScript Tutorial

JavaScript Reference

HTML CSS Reference

Python Tutorial

Python Open Source

SQL Server / T-SQL

SQL Server / T-SQL Tutorial

Oracle PL / SQL

Oracle PL/SQL Tutorial

VB.Net Tutorial

Flash / Flex / ActionScript

VBA / Excel / Access / Word

Microsoft Office PowerPoint 2007 Tutorial

Microsoft Office Excel 2007 Tutorial

Microsoft Office Word 2007 Tutorial

Perl » File » Open file

Opens two files and copies one into another.


    

#!/usr/local/bin/perl 



unless (open(INFILE, "file1")) { 

die ("cannot open input file file1\n"); 

} 

unless (open(OUTFILE, ">outfile")) { 

   die ("cannot open output file outfile\n"); 

} 

$line = <INFILE>; 

while ($line ne "") { 

    print OUTFILE ($line); 

    $line = <INFILE>; 

}

Related examples in the same category

1.	To open a file for appending:
2.	To open a file for reading and writing:
3.	To open a file for reading:
4.	To open a file for writing
5.	open (FILEHANDLE, "<&FILEHANDLE2");
6.	open (FILEHANDLE2, "<&=FILEHANDLE");
7.	open(MYFILE, ">>c:\\outfile.dat")
8.	Open FILEHANDLE
9.	Open Operators
10.	Open a file
11.	Open a file from another file handle
12.	Open a file to read
13.	Open a pipe to the who command
14.	Open command expressions
15.	Open file for update
16.	Open file for writing
17.	Open file reading
18.	Open for Appending
19.	Open for Reading
20.	Open for Reading and Writing
21.	Open for Writing
22.	Open for writing first, then reading
23.	Opening an input filter on a Win32 platform
24.	Opening files and using file handles: open(filehandle, name);
25.	Checks whether an unopened file actually exists.
26.	Input Filter: open(FILEHANDLE, COMMAND\|);
27.	Sending the Output of a Filter to a File: open(STDOUT, ">/dev/tty");
28.	Uses die when testing for a successful file open operation.
29.	Using open to connect different processes

www.java2java.com | Contact Us

Copyright 2009 - 12 Demo Source and Support. All rights reserved.

All other trademarks are property of their respective owners.