perl module: from_ and to_array