>>302-303 276さん。いつもどうもです。
スタック！全然気がついていませんでした。
popで最後の要素を返せば良かったんですね。
http://perlnewbold.hoops.jp/cbasket3.cpp

そういえばpopは最終要素の「取り出し」ですもんね。