| UMMF documentation | Contained in the UMMF distribution. |
UMMF::Export::Null - A code generator for /dev/null
my $d = UMMF::Export::Null->new('output' => *STDOUT);
my $d->export_Model($model);
This package allow UML models to be represented as nothing.
None exported.
Kurt Stephens, kstephens@sourceforge.net 2003/08/18
UMMF::UML::MetaModel (UMMF::UML::MetaModel)
$Revision: 1.3 $
| UMMF documentation | Contained in the UMMF distribution. |
package UMMF::Export::Null; use 5.6.1; use strict; our $AUTHOR = q{ kstephens@sourceforge.net 2003/08/18 }; our $VERSION = do { my @r = (q$Revision: 1.3 $ =~ /\d+/g); sprintf "%d." . "%03d" x $#r, @r };
####################################################################### use base qw(UMMF::Export); ####################################################################### sub initialize { my ($self) = @_; # $DB::single = 1; $self->SUPER::initialize; $self; } ####################################################################### sub export_Model { my ($self, $model) = @_; # NOTHING! $self; } ####################################################################### 1; ####################################################################### ### Keep these comments at end of file: kstephens@sourceforge.net 2003/04/06 ### ### Local Variables: ### ### mode:perl ### ### perl-indent-level:2 ### ### perl-continued-statement-offset:0 ### ### perl-brace-offset:0 ### ### perl-label-offset:0 ### ### End: ###