Reading one line from the file handle STDIN. : file read « File « Perl

Home
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 read 




Reading one line from the file handle STDIN.
     

$lang = <STDIN>;


#!/usr/bin/perl -w

# Usage:
#   copy1.pl infile outfile

$input = $ARGV[0];

$output = ">" . $ARGV[1];

open(INPUT, $input
    or die "Can't open $input due to $!.";

open(OUTPUT, $output
    or die "Can't open $output due to $!.";

# Use shorthand for reading file.
while <INPUT> ) {
    print OUTPUT $_;


# Close the files when done.
close (INPUT);
close (OUTPUT);

   
    
    
    
    
  














Related examples in the same category
1.The read Function (fread)
2.Read file content to a scalar variable
3.Read from a file
4.Read hash value from a file
5.Read line splitted by space
6.Read only the last file line from a text file
7.Read the first line of a local file
8.Read till the end of the file
9.Reading More than One Line
10.Reading a directory all at once with an array: Use an array with the readdir command, instead of a scalar variable
11.Reading from a Pipe
12.Reading from a file
13.Reading from the Filehandle
14.Reading the contents of a directory: change to that directory and then use the glob command
15.Reads an entire input file into an array.
16.Reads lines from a file and prints them.
17.Using read function in while loop
18.Using read function to read a file
19.The read Function reads a number of bytes into a variable from a filehandle.
20.Contents of the entire file are printed
21.Numbering Lines
22.To read a number of bytes from a file: $bytes_read = read(filehandle, $var, $length, $offset);
23.To read from a file:
java2s.com  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.