#!/bin/sh
# unbasename
# 
# 
# 2000(C) S.Ono
#
echo $1 |
awk ' {
	FS="/"
	s=$0
	n=length(s)
	len=split(s,a)
	
	for(i=0;i < len;i++)
	{
		if(a[i] == "."  || i == 0)
		{
			continue
		}
		printf("%s/",a[i])
	}
	printf("\n");
}'
