Newsgroups: fj.lang.perl
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!etlnews.etl.go.jp!etlinn.etl.go.jp!etl.go.jp!trc.rwcp!rwc-tyo!nf4.iij.ad.jp!news.iij.ad.jp!gw.omronsoft.co.jp!news
From: inai@ds.kyoto.omronsoft.co.jp (=?ISO-2022-JP?B?GyRCMHAwZk1OTTQbKEI=?= )
Subject: Re: perl no isdigit functional
Content-Type: Text/Plain; charset=ISO-2022-JP
Message-ID: <Dy0zuI.IpE@gw.omronsoft.co.jp>
Sender: news@gw.omronsoft.co.jp (News Manager)
Nntp-Posting-Host: hds324.ds.kyoto.omronsoft.co.jp
Organization: =?ISO-2022-JP?B?GyRCMyslOyMzGyhC?=
X-Newsreader: WinVN 0.99.7J (x86 32bit)
References: <Dy0qAz.8Ex@gw.omronsoft.co.jp> <CONAN.96Sep20161525@megadeth.armonicos.co.jp>
Mime-Version: 1.0
Date: Fri, 20 Sep 1996 10:01:29 GMT
Lines: 21
Xref: galaxy.trc.rwcp.or.jp fj.lang.perl:1246
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.lang.perl&nb=1246&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

$B0p0f$G$9!#(B

In article <CONAN.96Sep20161525@megadeth.armonicos.co.jp>, 
conan@armonicos.co.jp says...

>if ($x =~ /^\d+$/) {
>  # $B?t;z$@$1(B
>}
>
>$B$^$?$O(B
>
>if ($x =~ /^[0-9]+$/) {
>  # $B?t;z$@$1(B
>}
>perl $B$NK\$N@55,I=8=$N$"$?$j$rJY6/$5$l$k$HNI$$$G$7$g$&!%(B
>$B@$3&$,9-$,$j$^$9!%(B(^^)

$B$G$-$^$7$?!#$"$j$,$H$&$4$6$$$^$9!#(B_O_
-- 
$B0p0fMNM4(B<inai@ds.kyoto.omronsoft.co.jp>

