�ē�����������ē��G���^�[�e�C�����g�@�X���b�g�A���݂����A�X�Љ�[�r�[�Ȃǐ����R
�����@����v
$kaisetsu
$last_time�@�@���݁A���[����$total�ł��B
���̍��ڂP�Ƀ`�F�b�N���āA���[�{�^���������Ă��������B
|
EOM
if($koumoku_add eq 'yes'){
print " ���T���̍��ڂ��Ȃ����͈�ԉ��̃t�H�[���ō��ڂ�lj����ĉ������B\n";
}
if($cook eq '1'){
print " �P��̂��K��łP�����[�i�܂��͍��ڂ̒lj��j���ł��܂��B\n";
}
print <
EOM
if($koumoku_add eq 'yes'){
print <
|
|
EOM
}
# �ȉ�13�s�͍폜���Ȃ��ʼn������B(Copyright�ł�)
print <
| ���y�[�WTOP���@ |
| Copyright(C) 2008 manpukuCompany. All Rights Reserved. |