RosettaCodeData/Task/Multiple-distinct-objects/Perl/multiple-distinct-objects-1.pl

4 lines
107 B
Perl

(Foo->new) x $n
# here Foo->new can be any expression that returns a reference representing
# a new object