1 |
#!/usr/local/bin/perl -w |
#!/usr/local/bin/perl -w |
2 |
|
|
3 |
# Print all files which are in CVS repository. Obvious usage is to create |
# Print all files which are in CVS repository. Obvious usage is to create |
4 |
# archive of all files from repository which is full of other junk (it always |
# archive of all files from repository which is full of other junk (this always |
5 |
# happends to me :-) |
# happens to me :-) |
6 |
# |
# |
7 |
# It will dump all find on STDOUT, just like "find . -type f -print" |
# It will dump all find on STDOUT, just like "find . -type f -print" |
8 |
# and dump some debugging output on STDERR |
# and dump some debugging output on STDERR |