파일 이름에 공백이나 탭이 들어 가있을 때 패턴 매칭을 할 수 있는 졍규표현식

eoh@eoh-ubuntu:~/tmp/bulk$ ls

 공백으로 시작   앞뒤 공백   find.plx  공백으로 끝 

eoh@eoh-ubuntu:~/tmp/bulk$ ./find.plx 

뒤 공백-->공백으로 끝 <--

앞 공백--> 공백으로 시작<--

앞뒤 공백--> 앞뒤 공백 <--

eoh@eoh-ubuntu:~/tmp/bulk$ cat find.plx 

#!/usr/bin/perl

 

use strict;

use warnings;

 

foreach my $file (glob "*"){

	if($file =~ m/^ (.)* $/){

		print "앞뒤 공백-->" . $file . "<--" . "\n";

	}elsif($file =~ m/^ (.)*$/){

		print "앞 공백-->" . $file . "<--" . "\n";

	}elsif($file =~ m/^(.)* $/){

		print "뒤 공백-->" . $file . "<--" . "\n";

	}

}