Updated perlfile
Updated test partition file