�������Ƭ���Ǥ���0���ܡפǤ��뤳�Ȥϵ������������ġ�N���ܡפȤ������դ�ͻ����Ƥߤ� - ��(rubikitch wanna be (a . lisper))Javascript��PHP�������ؿ��ʤɤ� ����κǽ�����Ǥ�ary[0]�˳�Ǽ���줿��substring()�ؿ��ε����������Ǥ��ä��ꤷ�ޤ��� �����Ǥʤ����Ǥϥ���ʤΤǤ��礦�����Ŀ�Ū.. - ���ϸ����ϤƤ��ø��졢Ruby��Lisp�ʤ�¿���θ���Ǥ������0�����Ǥ��롣�Ĥޤꡢ��Ƭ�����ǤΥ���ǥå�����0�Ǥ��롣
�������ƤΥ���ե��������˰��äƤ����פǤ⡢���󥿥ӥ塼��#0����Ϥ��ޤäƤ���Τ����ɡ������ͳ������Ǥ��Ƥ��ޤ��त���ʤ���줬¸�ߤ��롣
perl����
���ޤ��Τ��Ƥ��ʤ��ü��ѿ�$[�������򥻥åȤ���ȡ����줬����ε����Ȥʤ롣
my @ary = (0..7);
print "\$ary[$_] = $ary[$_]\n" for (0..7);
{
local $[ = 1;
print "\$ary[$_] = $ary[$_]\n" for (1..8);
}
perldoc perlvar
$[ The index of the first element in an array, and of the first
character in a substring. Default is 0, but you could
theoretically set it to 1 to make Perl behave more like awk (or
Fortran) when subscripting and when evaluating the index() and
substr() functions. (Mnemonic: [ begins subscripts.)
As of release 5 of Perl, assignment to $[ is treated as a
compiler directive, and cannot influence the behavior of any
other file. (That��s why you can only assign compile��time
constants to it.) Its use is highly discouraged.
Note that, unlike other compile��time directives (such as
strict), assignment to $[ can be seen from outer lexical scopes
in the same file. However, you can use local() on it to
strictly bind its value to a lexical block.
���ƤΤȤ��ꡢIts use is highly discouraged.
�Ȥ��롣�褤���ϻȤ�ʤ������褤��������a2p(awk������ץȤ�perl����������ץ������;perl�򥤥󥹥ȡ��뤹��Ȥ��ʤ��դ��Ƥ���)�ʳ������������ǤϤ��뤬��$�ؤ�++���餤�ˤϤʤ뤫���Τ�ʤ���
Dan the Perl Monger
���Υ֥����˥����Ȥ���ˤ�����������ɬ�פǤ���
��������������
���ε����ˤϵ��ĥ桼�����������Ȥ��Ǥ��ޤ���