- Perl Basics
- Perl - Home
- Perl - Introduction
- Perl - Environment
- Perl - Syntax Overview
- Perl - Data Types
- Perl - Variables
- Perl - Scalars
- Perl - Arrays
- Perl - Hashes
- Perl - IF...ELSE
- Perl - Loops
- Perl - Operators
- Perl - Date & Time
- Perl - Subroutines
- Perl - References
- Perl - Formats
- Perl - File I/O
- Perl - Directories
- Perl - Error Handling
- Perl - Special Variables
- Perl - Coding Standard
- Perl - Regular Expressions
- Perl - Sending Email
- Perl Advanced
- Perl - Socket Programming
- Perl - Object Oriented
- Perl - Database Access
- Perl - CGI Programming
- Perl - Packages & Modules
- Perl - Process Management
- Perl - Embedded Documentation
- Perl - Functions References
- Perl Useful Resources
- Perl - Questions and Answers
- Perl - Quick Guide
- Perl - Useful Resources
- Perl - Discussion
Perl rewinddir Function
Description
This function Resets the current position within the directory specified by DIRHANDLE to the beginning of the directory.
Syntax
Following is the simple syntax for this function −
rewinddir DIRHANDLE
Return Value
This function returns 0 on failure and 1 on success.
Example
Following is the example code showing its basic usage −
#!/usr/bin/perl -w # Open the current directory opendir(DIR, "."); # Print all of the directory entries. print("1st Time: \n"); map( print("$_ \n") , readdir(DIR)); print("\n"); # Print message verifying that there are # no more directory entries to read. print("The last file has already been read!\n\n") unless readdir(DIR); # Go back to the beginning. rewinddir(DIR); # Print all of the directory entries again. print("2nd Time: \n"); map( print("$_ \n") , readdir(DIR)); print("\n"); closedir(DIR);
When above code is executed, it produces the following result(in /tmp directory) −
1st Time: . .. testdir The last file has already been read! 2nd Time: . .. testdir
perl_function_references.htm
Advertisements