#!/usr/bin/perl
#
# eg8: new function syntax
#
use strict;
use warnings;

use Function::Parameters qw(:strict);

fun hello( $x, $y = 10 )
{
	print "hello: x=$x, y=$y\n";
}

hello( 1 );
hello( 1, 2 );
hello( 1, 2, 3 );
