Learning perl 6th