mirror of
https://git.proxmox.com/git/perlmod
synced 2025-10-04 11:58:18 +00:00
16 lines
270 B
Perl
16 lines
270 B
Perl
#!/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);
|