perldl> p $one_element_slice = $piddle(5,5);