my @coords = $canvas->coords($id);
my ( $x0, $y0, $x1, $y1 ) = $canvas->coords($id);