map { print $_ . "\n" } <C:\*>;