Perl Sleep时间

请问perl中可以让程序sleep 500毫秒吗？
我在脚本中写： 
map {
  sleep（0.5);
} 1 .. 100;

我想让它sleep 0.5s，共100次，就是总共sleep 50秒，
但是程序是一瞬间就执行完了，sleep(0.5)不能达到效果。

用select

把你sleep（0.5);
换成
select(undef,undef,undef,0.5);