Hemant,

Please don't laugh! ;-)

I've only started learning perl a couple of months ago & this is one of my 
first efforts

Hope this helps!

cmr

On Tue 13 May 2008 20:55, you wrote:
> I am looking for the same thing.
> Can you send me the perl script?
>
> Thanks.
>
> Hemant Shah
> E-mail: hjrrs AT yahoo DOT com
>
> --- On Tue, 5/13/08, C M Reinehr <cmr AT amsent DOT com> wrote:
> > From: C M Reinehr <cmr AT amsent DOT com>
> > Subject: Re: [Bacula-users] Truncating Disk Volumes?
> > To: bacula-users AT lists.sourceforge DOT net
> > Date: Tuesday, May 13, 2008, 9:24 AM
> > Mingus,
> >
> > On Mon 12 May 2008 15:22, Mingus Dew wrote:
> > > I know that Bacula doesn't delete actual data, it
> >
> > just prune's from the
> >
> > > catalog based on Client, Job, or Pool configuration. I
> >
> > was wondering how I
> >
> > > can truncate disk volumes that have jobs/files pruned
> >
> > from the catalog, but
> >
> > > the data still exists. I'm running into space
> >
> > usage issues. I realize I
> >
> > > could limit the volume sizes, but that doesn't
> >
> > solve my situation of
> >
> > > deleting data.
> > >
> > > Thanks
> >
> > I handle this with a perl program which is run daily as an
> > admin job. It
> > filters a list of volumes from bconsole for purged status
> > and then executes a
> > system command to delete the files. I'm sure details
> > vary greatly from site
> > to site, but I think this is the generally accepted way of
> > doing this.
> >
> > HTH.
> >
> > Cheers!
> >
> > cmr
> > --
> > Debian 'Etch' - Registered Linux User #241964
> > --------
> > "More laws, less justice." -- Marcus Tullius
> > Ciceroca, 42 BC
> >
> > -------------------------------------------------------------------------
> > This SF.net email is sponsored by: Microsoft
> > Defy all challenges. Microsoft(R) Visual Studio 2008.
> > http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
> > _______________________________________________
> > Bacula-users mailing list
> > Bacula-users AT lists.sourceforge DOT net
> > https://lists.sourceforge.net/lists/listinfo/bacula-users
>
> -------------------------------------------------------------------------
> This SF.net email is sponsored by: Microsoft
> Defy all challenges. Microsoft(R) Visual Studio 2008.
> http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
> _______________________________________________
> Bacula-users mailing list
> Bacula-users AT lists.sourceforge DOT net
> https://lists.sourceforge.net/lists/listinfo/bacula-users

-- 
Debian 'Etch' - Registered Linux User #241964
--------
"More laws, less justice." -- Marcus Tullius Ciceroca, 42 BC

bacula_maint-daily.pl
Description: Perl program

-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft 
Defy all challenges. Microsoft(R) Visual Studio 2008. 
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/

_______________________________________________
Bacula-users mailing list
Bacula-users AT lists.sourceforge DOT net
https://lists.sourceforge.net/lists/listinfo/bacula-users