#!/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";
}