Numbering Lines : file read « 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 read

Numbering Lines

    



#!/usr/bin/perl



use warnings;

use strict;

open FILE, "nlexample.txt" or die $!;

my $lineno = 1;

while (<FILE>) {

    print $lineno++;

    print ": $_";

}

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 one line from the file handle STDIN.
15.	Reading the contents of a directory: change to that directory and then use the glob command
16.	Reads an entire input file into an array.
17.	Reads lines from a file and prints them.
18.	Using read function in while loop
19.	Using read function to read a file
20.	The read Function reads a number of bytes into a variable from a filehandle.
21.	Contents of the entire file are printed
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

All other trademarks are property of their respective owners.