Help for this page
print map { "$_|" } @my_list
$my_id_list .= $my_list[$i]."|";
push ( @my_id, "$my_list[$i]|" );
push ( @my_id, $my_list[$i] );
join('|',@my_id);