mirror of
git://git.proxmox.com/git/perlmod.git
synced 2025-03-13 04:58:16 +03:00
add test.pl file for a usage example of perlmod-test
Signed-off-by: Wolfgang Bumiller <w.bumiller@proxmox.com>
This commit is contained in:
parent
d870bc9bb3
commit
e95a2c0a23
15
test.pl
Normal file
15
test.pl
Normal file
@ -0,0 +1,15 @@
|
||||
#!/usr/bin/env perl
|
||||
|
||||
use v5.28.0;
|
||||
|
||||
use lib '.';
|
||||
use RSPM::Bless;
|
||||
|
||||
my $v = RSPM::Bless->new("Hello");
|
||||
$v->something();
|
||||
my ($a, $b, $c) = $v->multi_return();
|
||||
say "Got ($a, $b, $c)";
|
||||
my @ret = $v->multi_return();
|
||||
say "Got: ".scalar(@ret)." values: @ret";
|
||||
|
||||
$v->another(54);
|
Loading…
x
Reference in New Issue
Block a user