Tuples

This page is under construction. Please come back later.
#!/usr/bin/env perl
use utf8;
use Utils;
use strict;
use warnings;
MAIN:
{
my $pair1 = ["Hello", 5];
my $pair2;
my $pair3;
$pair2 = (3, 3.1415926);
$pair3 = ("Goodbye", 1.5);
print $pair1->[0], ",", $pair1->[1], "\n";
print $pair2->[0], ",", $pair2->[1], "\n";
print Utils::tupleToString($pair3), "\n";
}
Output
$ perl Tuples1.pl
Hello,5
3,3.1415926
<Goodbye, 1.5>
#!/usr/bin/env perl
use utf8;
use strict;
use warnings;
MAIN:
{
my $pair1 = ["Hello", 5];
my $tuple1 = ["Goodbye", 3, 3.1415926];
my $tuple2 = [1.6, 2.5, 5, "C"];
print $pair1->[0], ",", $pair1->[1], "\n";
print $tuple1->[0], ",", $tuple1->[1], ",", $tuple1->[2], "\n";
print $tuple2->[0], ",", $tuple2->[1], ",", $tuple2->[2], ",", $tuple2->[3], "\n";
}
Output
$ perl Tuples2.pl
Hello,5
Goodbye,3,3.1415926
1.6,2.5,5,C
Questions
- {{Who's on first?}}
- {{Who's on second?}}
- {{Who's on third?}}
Projects
More ★'s indicate higher difficulty level.
References
- [[Perl Language Reference]]
- [[Comprehensive Perl Archive Network (CPAN)]]
- [[Beginning Perl]], Simon Cozens
- [[Perl Monks Tutorials]]
Pure Programmer


