sub y { my @arg = @_; print join ':', (@arg[0..2]); }