����ɽ����������뤿��Υ롼���� in C

• rege-0.51.tar.gz [1998/12/17] ��ȯ�С�����󡢺Ǻ���û�ޥå���Ū��Ƴ��
• ���ܸ�� README
• �إå��ե����� rege.h
• �������ե����� rege.c
• ����ץ�ץ������ lgrep.c
• rege-0.5.tar.gz [1998/12/16]
• ���ܸ�� README
• �إå��ե����� rege.h
• �������ե����� rege.c
• ����ץ�ץ������ lgrep.c

Perl ����٤ƽ���ʤ����Ȥϡ���\digit�פˤ��������Ȥ䡢��\b,\B�פΥ��󥫡���GNU regex ����٤ƽ���ʤ����Ȥϡ���\<,\>�פΥ��󥫡���POSIX ����٤ƽ���ʤ����Ȥϡ�[:digit:]�פʤɤ�ʸ�����饹�ʤɤǤ��������ϡ��ޤ��꤬���������ˤǤ��������Ĥ��Ǥ�����ñ�쳫�ϰ��֤ʤɤΥ��󥫡���������Ȥ�ɤΤ褦�˼�������Х٥��Ȥ����ΤȤ����ͤ���Ǥ���

�ޤ�������ɽ���ι�ʸ��§�Υ������ޥ����⤢�����ٹ�θ����Ƥ���Τǡ�AWK, GREP �ߴ��ʤɤ˥������ޥ������뤳�Ȥ��ưפǡ�����ˡ��ǥե���Ȥι�ʸ��§���ѹ��Τ���Υޥ���(REGE_SYNTAX_AWK, REGE_SYNTAX_GREP �ʤ�)���Ѱդ��Ƥ���ޤ����������������Ĥ��Υ���ƥ�����ʵ�ư�Ǵ����ʸߴ��ˤϤʤäƤ��ޤ���

�����ơ� ��ݲ��б��ˤĤ��Ƥϡ�����Ū�� wchar �� wstring �ؤ��ִ��������Ū��ñ�˽����褦�˹�θ�����Ĥ��Ǥ�����POSIX ������ɽ���ι�ݲ��ˤĤ��Ƥ������Ĵ�٤��櫓�ǤϤʤ��Τǡ������ܺ٤������Ǥ���

���ޤΤȤ����ѥ�����ޥå��󥰥롼���󤷤��Ѱդ��Ƥޤ���

�Ȥ���

char *from, *to, *p, buf[256], pattern[] = "^$"; /* pattern �ˤ�����ɽ������� */
rege_t *rege;

rege = rege_compile(pattern, 0, NULL); /* ����ɽ���Υ���ѥ��� */
p = buf; /* buf �ϥѥ�����ޥå��󥰤�Ԥ��о�ʸ���� */
rege_match(rege, p, strlen(p), &from, &to);
while (from != NULL) {
  /* �ޥå������ϰϤ������� *from, *to ����������� */
    ;
  if (p==from && p==to) /* �ʥ�ʸ�������Ƭ�ǥޥå��������Τ������ */
    if (*(to+1) == '\0')
      break;
    else
      to++;
  p = to;
  rege_next_match(rege, p, strlen(p), &from, &to);
}
rege_free(rege);

trans_table  �ˤϥ����� 256 ��ʸ�������ɤ��Ѵ�ɽ����ꤹ�뤳�Ȥ�����ޤ����㤨�С���ʸ���Ⱦ�ʸ����̵�뤹��ʤ顢

static char icase_table[256];
int i;

for (i=0; i<256; i++)
  icase_table[i] = isupper(i)?tolower(i):i;
rege = rege_compile(pattern, 0, icase_table);

rege->trans_table = icase_table;
rege_match(rege, p, strlen(p), &from, &to);

rege = rege_compile(pattern, REGE_SYNTAX_POSIX_EXTENDED|REGE_IGNORE_CASE, NULL);

����ʸ��

1. ��ƣ ����, ``C �ץ�����ޤΤ���Υ��르�ꥺ��ȥǡ�����¤ Part 2,'' ���եȥХ�, pp. 41-74, 1993.