Project #6 Perl

This assignment has two parts. Each part must be done using Perl.

The following is part B.

Part B- projectSorter.pl Assume you have a directory filled with random files including some project files beginning with the string "proj" (e.g proj1.c, projB.o, proj12.h) and no directories. Create a script which places each file into a corresponding project directory titled "assignmentXXX" where XXX is replaced with whatever follows the string "proj" in the file, not including the extension. Any other files not beginning with "proj" should be placed into a "misc" directory The script should be invoked with the following format projectSorter.pl directory Example data is located in/usr/local/courses/clark/cs3423/2017Fa/Proj6/ For part B, copy those into a directory named "DataB" Example: For a directory, DataB, containing the following files input.txt projPer11.input projz.c projz.h proji.c pro1.o proj12.o projPerl1.perl trash.txt Executing projects rter DataB produces the following file structure in DataB assignment1/ proj1.c proj1.o proj12.c projPer11.perl assignment12/ assignmentPerl1/ projPer11.input assignmentz/ projectz.c projectz.h misc/ input.txt trash.txt Notes for partB . The glob function can be useful in getting the contents of the specified directory . You will probably need to use expression to invoke Linux commands to create directories and move files What to turn in A LastnameFirstname.zip file containing: find.pl - Perl script for part A. projectSorter.pl- Perl script for part B O o