[mythtv] script to repopulate recorded table

[Greg.Froese at Federated.CA]

funny that Nathan submitted that perl script earlier, I was working on
something similar so
I thought I'd submit it now in case anybody finds it useful.

here is the description from the source.
source is attached.

## I had trouble maintaining my catalog of recordings when upgrading to
## cvs and from cvs to more recent cvs, so I wrote this.
##
## Here is what this program is supposed to do.
## It first scans through your myth database and displays all shows listed
## in the recorded table.
## It will then traverse your myth directory (set with --dir /YOURMYTHDIR)
and
## find all your .nuv files and check them against the database to make
sure
## they have an entry.  If no entry exists, you will be prompted for the
title
## and subtitle of the recording and a record will be created.
##
## The following options are available to be changed from the command line
## (I've put defaults in if you leave them out, except for $dir)
## --host HOSTNAME
## --user DBUSERNAME
## --pass DBPASSWORD
## --dir /MYTHFILESARESTOREDHERE  (must be fully qualified dir)
## --database DATABASENAME
##
## use at your own risk, i am not responsible for anything this program
may
## or may not do.

## unfortunately i used File::Find::Rule which requires a few other
modules from
## search.cpan.org
##
## I had to install the following modules, your results may vary:
## File-Find-Rule-0.08
## Number-Compaire-0.01
## Text-Glob-0.05

(See attached file: myth.util.pl)
-------------- next part --------------
A non-text attachment was scrubbed...
Name: myth.util.pl
Type: application/octet-stream
Size: 8507 bytes
Desc: not available
Url : /pipermail/attachments/20030114/a24c31c3/myth.util.obj