sub h{
    select $9,$8,$7,pop
}