Help for this page
use IPC::System::Simple qw/run/; run q{ find /path/to/files -name '*.csv' | cpio -pdm /target };