On Fri, Oct 26, 2012 at 12:19 PM, Joseph Spenner <joseph85750 AT yahoo DOT com> 
wrote:
> In case anyone finds this useful, I wrote this to quickly show all the
> FileSets:
>
> -----
>
> #!/usr/bin/perl
>
> @fileSetCommand=`echo "show fileset" | bconsole |grep FileSet`;
>
> foreach $line (@fileSetCommand) {
>         $line =~ m/\=(.*)/;
>         $fileSet=$1;
>         push (@fileSets, $fileSet);
>         }
>
> foreach $line (@fileSets) {
>         @thisSet=`echo "show fileset=\\\"$line\\\"" | bconsole`;
>         print "\n==============\n";
>         foreach $line (@thisSet) {
>                 if ($line =~ m/ I | E |^FileSet/) {
>                         $line =~ s/name\=//g;
>                         print $line;
>                         }
>                 }
>         }
>
Thanks for sharing that.

John

------------------------------------------------------------------------------
The Windows 8 Center 
In partnership with Sourceforge
Your idea - your app - 30 days. Get started!
http://windows8center.sourceforge.net/
what-html-developers-need-to-know-about-coding-windows-8-metro-style-apps/
_______________________________________________
Bacula-users mailing list
Bacula-users AT lists.sourceforge DOT net
https://lists.sourceforge.net/lists/listinfo/bacula-users