The seek Function randomly accesses a file: seek(FILEHANDLE, BYTEOFFSET, FILEPOSITION); : file seek « 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 seek 
The seek Function randomly accesses a file: seek(FILEHANDLE, BYTEOFFSET, FILEPOSITION);
    

#Positions are
#= Beginning of the file
#= Current position in the file
#End of the file

open(FH,"db"or die "Can't open: $!\n";
while($line=<FH>){
    if ($line =~ /LLLL/) { 
       print "--$line--\n";
    }
}
seek(FH,0,0);   
while(<FH>) {
   print if /Sss/;
}

   
    
    
    
  
Related examples in the same category
1.Seek a file
2.Seek a minus value
3.Seek and tell.
4.Seek current position
5.Seek log file
6.Using seek function from IO:File
7.The seek Function randomly accesses a file.
8.File seek operations
9.Move file pointer by using the seek function
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.