#!/usr/bin/perl
use strict;
use warnings;
use File::Copy 'mv';

mkdir( 'Project/src' ) or die $!;

mv('Project/lib', 'Project/src/lib' )  or die $!;
mv('Project/t',   'Project/src/apps' ) or die $!;

__END__