camel

������Ф��뿿���ܤʲ����Ȥ���ä��Կ����ܤʲ�����

strict �ץ饰�ޤˤĤ��� - perl-mongers.org
��use strict; �äƲ��ǥǥե���Ȥǥ���ˤʤäƤʤ��Ρ���
�����Ƥߤ�гΤ��ˡ����Ǥʤ�Ǥ��礦����

�ޤ�Ĺ����ͳ�Ȥ��Ƥϡ����̸ߴ�����Perl 5��Perl 4�ϡ�C++��C�ʾ�˰ۤʤ����Ǥ�����������C��C++�����Ĥ��ä��褦�ˡ�Perl 4��Perl 5�����ĤǤ�����Perl 5�Υ�꡼���ˤ����äƤϡ���ǽ��ĥ��Ʊ�����餤���̸ߴ����˵����Ȥ��Ƥ��ΤǤ�����������Perl 4�Υ�����ץȤϡ�Perl 5�Ǥ�ۤȤ��̵�ѹ���ư�������Ȥ�����ޤ����������ʤ�strict�ˤʤä���ư���ʤ��ʤä��㤤�ޤ���͡�

Perl 6�Ǥϡ�Perl 5�Ȱ�äƲ��̸ߴ����ϤФä����ڤäƤ��ޤ����Ǥ��Τ�use strict��use warnings�ϥǥե���Ȥ�On��-e�����å���Ȥäƥ��ޥ�ɥ饤��Ǽ¹Ԥ�����Τߥ��դˤʤ�Ȥ������ͤ˷��ꤷ�Ƥ��ޤ���

����Ǥ�������󤷤����Ȥ������ˤϡ��ʲ�����ˡ������ޤ���

�Ķ��ѿ�PERL5OPT�����Ѥ���ΤǤ���

sh�ʤ���bash���ä���~/.profile��

PERL5OPT='-Mstrict -Mwarnings'; export PERL5OPT
# bash�ʤ�
export PERL5OPT='-Mstrict -Mwarnings'
# �Ǥ�OK

csh�ʤ���tcsh�ʤ�~/.cshrc��

setenv PERL5OPT '-Mstrict -Mwarnings'

�Ƚ񤤤Ƥ�����OK�Ǥ���

���������Ȥ��ȡ�-e��Ȥä����ˤ�ƶ����ڤӤޤ�������Ϸ빽��������ΤǤ���

% perl -le 'print $a'
Name "main::a" used only once: possible typo at -e line 1.
Use of uninitialized value $a in print at -e line 1.

������󡢤�����äƲ��򤹤뤳�Ȥ����Ϥ��ޤ���

% env PERL5OPT='' perl -le 'print $a'

������������Ǥ��޳ѤΥ��饤�ʡ�����ä����ʤ���

���������櫓�ʤΤǡ����ä��ꥹ����ץȤ˽񤯻��ˤ�

#!/usr/bin/perl
use strict;
use warnings;

�Ƚ񤯤Τ���ˡ(best practice)�Ȥʤä��Ȥ����櫓�Ǥ���

��CISCO IOS��ip classless�ߤ����ʤ�Τ����Τ�11.3�ǥǥե���Ȥˤʤä��ä���

Dan the Perl Monger