\refで受け取った数字列の中から部分を取り出すには？

名前: アーベル
日時: 2007-10-29 10:44:34
IPアドレス: 221.121.175.*

\refで受け取った数字列の中からピリオド.を境にした部分を取り出して
印字したいのです。
例えば1.2と受け取ったら1の部分、2の部分のみを取り出す。
下記のTeXプログラムを作りました。だけどうまくいきません。
%%%%%%%%%%%%%%%%ここから%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
       \documentclass{jsbook}
       \begin{document}
		\chapter{はじめの章}
	        	\section{はじめの節}
			今日は！
	        	\section{次のの章}
 			\label{王}
	\def\部分をとる#1.#2{#2}%このマクロを作りました
                   良い天気  \\
                    \ref{王}    \\
%		\expandafter\部分をとる{\ref{王}}%  2と出て欲しい所
      \end{document}
%%%%%%%%%%%%%%%%ここまで%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
資料で調べてみたらコマンド\catcodeと関係があるようなのです。
そうでないかもしれません。いずれにせよ、
お忙しいとは存じますが
教えていただけないでしょうか？

この書き込みへの返事：