Subversion Repositories svn.Prod repos

Rev

Rev 43 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 43 Rev 44
Line 1... Line 1...
1 
#!/usr/bin/env perl
 1 
#!/usr/bin/env perl
2 
# =============================================================================
 2 
# =============================================================================
3 
# Create
 3 
# Create
4 
# name  : Andre Rikkert de Koe          date:   Apr 2011
 4 
# name  : Andre Rikkert de Koe          date:   Apr 2011
5 
# descr : filefind
 5 
# descr : filefind
6 
#         This is a demo of programming in the perl language.
 6 
#         This is a demo of programming in the Perl language.
7 
#         Its part of a project to implement a program to create a directory
 7 
#         Its part of a project to implement a program to create a directory
8 
#         tree similar to the output of the Unix find program.
 8 
#         tree similar to the output of the Unix find program.
9 
#         Because of the example, we don't use the standard File::Find module.
 9 
#         Because of the example, we don't use the standard File::Find module.
10 
# EUID  : Any user who has read access to all the files being searched for.
 10 
# EUID  : Any user who has read access to all the files being searched for.
11 
# run   : interactive
 11 
# run   : interactive