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