����ä�Perl�ǡ�
�餢��ë������P�η�̤��դ˽񤱤����äơ�C/C++�ʳ��ˤ���Τ���������
my $a = 1; my $b = 2; print "a = $a, b = $b\n"; ($a < $b ? $a : $b) = 0; print "a = $a, b = $b\n";
a = 1, b = 2 a = 0, b = 2
�������˾åµï¿½ï¿½ï¿½ï¿½Ï¤ï¿½ï¿½Þ¤ï¿½È¤ï¿½ï¿½Þ¤ï¿½ï¿½ó¤¬¡ï¿½
my $str = "foobar"; substr($str, 3, 3) = 'dan'; # foodan
�Ȥ������Ū�褯�����ޤ���
���ʤߤˡ�DCONWAY�Ϻ���������(lvalue assignment)�˴ؤ��Ƥϡֽ���뤱�ɤ��Ȥ��ɡפǤ�
��Ϸ빽�����ʤ�����ɤʤ�....
Dan the Lvaluable Man
�ɵ�[2009.05.30]�ͥ��Ϸ����֤���
COBOL�������ϡ�<MOVE �� TO �ѿ�>�Ȥ����ѿ�����¦���֤��������ʤΤǡ��ֺ����͡פȤϸ���ʤ����⤷��ޤ��󤬡�
�����Τ褦�˽񤯤ȡ�'APPPEF' ��ɽ������ޤ���
MOVE 'ABCDEF' TO �ףˡ�ʸ����.
MOVE 'PPP' TO �ףˡ�ʸ����(2:3).
DISPLAY �ףˡ�ʸ����.
��������COBOL�ˤϴؿ��ΤȤ����ͤ������ۤȤ��̵���Τǡ��ֺ����͡פβս��ؿ����P(��P��ؿ���)�ˤ��뤳�ȤϤǤ��ޤ��󡣡ֺ����͡פǤĤ�����Τ���ʬʸ��������Ǥ���