NAME

Tie::Dir - class definition for reading directories via a tied hash

SYNOPSIS

tie %hash, Tie::Dir, ".";

new Tie::Dir \%hash, ".";

$hash = new Tie::Dir ".";

# itterate through the directory
foreach $file ( keys %hash ) {
	...
}

# Set the access and modification times (touch :-)
$hash{SomeFile} = time;

# Obtain stat information of a file
@stat = @{$hash{SomeFile}};

# Check if entry exists
if(exists $hash{SomeFile}) {
	...
}

# Delete an entry
delete $hash{SomeFile};

DESCRIPTION

This module provides a method of reading directories using a hash.

The keys of the hash are the directory entries and the values are a reference to an array which holds the result of stat being called on the entry.

The access and modification times of an entry can be changed by assigning to an element of the hash. If a single number is assigned then the access and modification times will both be set to the same value, alternatively the access and modification times may be set separetly by passing a reference to an array with 2 entries, the first being the access time and the second being the modification time.

new [hashref,] dirname

This method ties the hash referenced by hashref to the directory dirname. If hashref is omitted then new returns a reference to a hash which hash been tied, otherwise it returns the result of tie

AUTHOR

Graham Barr <bodg@tiuk.ti.com>, from a quick hack posted by Kenneth Albanowski <kjahds@kjahds.com> to the perl5-porters mailing list