package main;
use BodyParts;
my $body = BodyParts->new;
$body = $body->legs( size=>42 )->eyes( color => blue);
print $body->eyes->color; ## blue