opendir( CUR, "whateverdir" ) or die "opendir: $!\n";
do { unlink or warn "unlink " . quotemeta($_) . ": $!\n"} 
  for grep /\n$/, readdir( CUR );
closedir( CUR );

##</code><code>##

$ find -name "*\n" -print0 | xargs -0 rm