そんな日に書いた、Perlのスクリプト。 #!/usr/bin/perl use strict; use warnings; my $some_dir = 'F:\foo\bar; opendir( DIR, $some_dir ) or die "can't opendir $some_dir: $!"; while ( my $d = readdir(DIR) ) { if ( $d =~ /^a\d/ ) { print "$d ===…

結局参加したのは以下。 JMAR001-03 Enterprise JavaBeans 3.0 Sun Microsystems,Inc. Linda DeMichiel EJB3.0の概説。 今まで雑誌で見たりしてきたことばかりだったので、特に面白いこともなし。眠くなった。てか、寝てた。 とりあえず縁がありそう、という…