[kansaipm] Re: Perl Mongers Tシャツ

mishima at momo.so-net.ne.jp mishima at momo.so-net.ne.jp
Sat Oct 21 00:52:08 CDT 2000


三嶋%Tシャツ係です。

本日、クレジットカードの請求が来ました。
1品あたり2000円で、名札基金への寄付は921円となりました。

では、本日焼肉屋へ持参しますので、よろしくお願いします。

  <<< 注文受付表 >>>
 
========================================================================
 	[TシャツM]	[TシャツL]	[ラクダ帽]	請求額
------------------------------------------------------------------------
 三嶋		2		1		1	 8,000円
 福原		1		0		1	 4,000円
 kiyoka		1		0		0	 2,000円
 岩井		1		0		0	 2,000円
 武藤氏 	0		1		0	 2,000円
------------------------------------------------------------------------
 合計		5		2		2	18,000円
------------------------------------------------------------------------

Description Options	Price After Options	Quantity	Subtotal 
Perl Mongers T-Shirt M	$ 15.00 		5		$ 75.00 
Perl Mongers T-Shirt L	$ 15.00			2		$ 30.00 
Perl Mongers Hat	$ 15.00			2		$ 30.00 

Pre-shipping Grand Total = $ 135.00 

Shipping: $ 20.95

Grand Total: $ 155.95

円換算後合計	17,079円(換算レート $1.00 = 109.52円)
名札基金寄付	   921円

--
$p='Perl'; $_='Masahiro Mishima'; sub _{pack'c*',$x=110+ at _*5,$x+1}
tr/oma/fa_/;s/./chr(ord($&)+2)/ge;@x=(sort(grep{!$_{$_}++}split//),
$p=~/(.(..).)/);$x[7]=~s/^/_/e;$x[8].=_ 1;for(@w=(47,1639,8,31259))
{s/\d/$x[$&+1]/g} print ucfirst "@w.\n";




More information about the Kansai-pm mailing list