diff options
Diffstat (limited to 'gfsm/gfsm/doc/programs/gfsmutils.skel')
-rw-r--r-- | gfsm/gfsm/doc/programs/gfsmutils.skel | 90 |
1 files changed, 90 insertions, 0 deletions
diff --git a/gfsm/gfsm/doc/programs/gfsmutils.skel b/gfsm/gfsm/doc/programs/gfsmutils.skel new file mode 100644 index 0000000..cc25d9d --- /dev/null +++ b/gfsm/gfsm/doc/programs/gfsmutils.skel @@ -0,0 +1,90 @@ +[@ # -*- Mode: Perl -*- + my @gogs = glob('*.gog'); + @subogs = qw(); + foreach my $gog (sort(@gogs)) { + my $subog = Getopt::Gen->new(handle_rcfile=>0); + $subog->parse($gog); + push(@subogs, $subog); + } +@] +=pod + +=head1 NAME + +gfsmutils - finite state machine command-line utilities + +=head1 PROGRAMS + +The following is a list of the programs +and user documentation contained in the gfsm package. +See the individual manpages for details. + +[@ + foreach my $subog (@subogs) { + next if (!defined($subog->{USER}{program}) + || $subog->{USER}{program} =~ /^\s*$/); + $OUT .= ("=head2 $subog->{USER}{program}\n" + ."\n" + ."$subog->{purpose}\n" + ."\n" + ."See L<$subog->{USER}{program}> for details.\n" + ."\n" + ."\n" + ); + } +@] + +=cut + +############################################################### +# Description +############################################################### +=pod + +=head1 DESCRIPTION + +The gfsmutils package provides a suite of command-line tools +for manipulation of finite state machines (FSMs) using +the libgfsm library. + +=cut + +############################################################### +# Addenda +############################################################### +=pod + +=head1 ADDENDA + +=head2 About this Document + +Documentation file auto-generated by [@$og{name}@] version [@$OptGenVersion@]. +Translation was initiated +as: + + [@$CMDLINE_OPTIONS@] + +=cut + + +############################################################### +# Footer +############################################################### +#=pod +# +#=head1 ACKNOWLEDGEMENTS +# +##[ @ join('',`cat acknowledge.pod`); @ ] + +=head1 SEE ALSO + +[@ + join(",\n", (map { $_->{USER}{program}."(1)" } @subogs)); +@], +fsm(1), fsm(5) + +=head1 AUTHOR + +Bryan Jurish E<lt>moocow@ling.uni-potsdam.deE<gt> + +=cut |