diff options
Diffstat (limited to 'Aufgabe6/RPN/lib')
| -rw-r--r-- | Aufgabe6/RPN/lib/RPN.pm | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/Aufgabe6/RPN/lib/RPN.pm b/Aufgabe6/RPN/lib/RPN.pm index bcf1b38..92f6f50 100644 --- a/Aufgabe6/RPN/lib/RPN.pm +++ b/Aufgabe6/RPN/lib/RPN.pm @@ -1,6 +1,5 @@ package RPN; -use 5.022000; use strict; use warnings; @@ -15,21 +14,23 @@ our @ISA = qw(Exporter); # This allows declaration use RPN ':all'; # If you do not need this, moving things directly into @EXPORT or @EXPORT_OK # will save memory. -our %EXPORT_TAGS = ( 'all' => [ qw( - -) ] ); +our %EXPORT_TAGS = ( 'all' => [ qw( rpn ) ] ); our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } ); -our @EXPORT = qw( - -); +our @EXPORT = qw( ); -our $VERSION = '0.01'; +our $VERSION = '1.0'; # Preloaded methods go here. +sub rpn { + my ( $par1 ) = @_; + print "Modul RPN Funktion 'rpn'\n"; + return $par1; +} + 1; __END__ # Below is stub documentation for your module. You'd better edit it! |
