
;Ȃ
;print $_FILE

PRINT \@ipara(0) = @ipara(0)
;#exit
PRINT \@ipara() = @ipara()
PRINT \@ipara(xx) = @ipara(xx)
PRINT \@ipara(0, yy) = @ipara(0, yy)
PRINT \@ipara(0, 1, zz) = @ipara(0, 1, zz)
PRINT \@ipara(2, 1, 5) = @ipara(2, 1, 5)
PRINT \@ipara(,) = @ipara(,)
PRINT \@ipara(,  ,@ ) = @ipara(,  ,@ )
PRINT \@ipara(1) = @ipara(1)
PRINT \@ipara(1,󔒁@) = @ipara(1,󔒁@)
PRINT \@ipara(1x) = @ipara(1x)
PRINT \@ipara(1,) = @ipara(1,)
PRINT \@ipara(1,10) = @ipara(1,10)
PRINT \@ipara(1,10,) = @ipara(1,10,)
PRINT \@ipara(1,0,zz) = @ipara(1,0,zz)
PRINT \@ipara(1,10) = @ipara(1,10)
PRINT \@ipara(1,1j) = @ipara(1,1j)
PRINT \@ipara(1g,1j) = @ipara(1g,1j)
PRINT \@ipara("123",1j) = @ipara("123",1j)
PRINT \@ipara("123",1j) = @ipara("123,1j)
