Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
1
Task/Compound-data-type/Perl/compound-data-type-1.pl
Normal file
1
Task/Compound-data-type/Perl/compound-data-type-1.pl
Normal file
|
|
@ -0,0 +1 @@
|
|||
my @point = (3, 8);
|
||||
4
Task/Compound-data-type/Perl/compound-data-type-2.pl
Normal file
4
Task/Compound-data-type/Perl/compound-data-type-2.pl
Normal file
|
|
@ -0,0 +1,4 @@
|
|||
my %point = (
|
||||
x => 3,
|
||||
y => 8
|
||||
);
|
||||
9
Task/Compound-data-type/Perl/compound-data-type-3.pl
Normal file
9
Task/Compound-data-type/Perl/compound-data-type-3.pl
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
package Point;
|
||||
|
||||
use strict;
|
||||
use base 'Class::Struct'
|
||||
x => '$',
|
||||
y => '$',
|
||||
;
|
||||
|
||||
my $point = Point->new(x => 3, y => 8);
|
||||
Loading…
Add table
Add a link
Reference in a new issue