Week Five Agenda

1. Week Five Agenda Announcements Link of the week Review week four lab assignment This week’s expected outcomes Next lab assignment Reading assignments Upcoming deadlines Lab assistance, questions and answers

2. Midterm exam Midterm Outline Mid-term outline available here: http://cs.franklin.edu/~varneyg/itec400/StudyGuides/Midterm_Outline.doc Announcements

3. Link of the week • Data Disaster • Ontrack Data Recovery • http://www.ontrackdatarecovery.com • http://www.mozy.com • Data Disaster Helpful Hints • - Use dedicated circuits for your connection • - Keep your computer cool and in a dry place • - Use a UPS (Uninterrupted Power Supply) • - Don’t assume that your data is permanently destroyed even if the situation looks bad • - Secure your work area and devices

4. Link of the week • Data Disaster • Big and small company operations • Backup services • Trouble shooting • Data recovery

5. Review week four lab assignment • What is an object file? • Object code is a representation of code generated by a compiler after it processes a programming language code file. It contains compact, pre-parsed code, often referred to as binaries that can be linked with other object files to generate a final executable.

6. Review week four lab assignment • What is ELF? • Executable and Linking Format (ELF) is a common standard file format for executables, object code, shared libraries, and core dumps.

7. Review week four lab assignment

8. Review week four lab assignment Online Documentation There are some websites that have Perl documentation. The two biggest ones are: http://perldoc.perl.org/ http://search.cpan.org/ for modules

9. Review week four lab assignment • Perl Syntax • ;end of statement delimiter • ,comma for line continuation • \nnew line (non-printable character) • Perl Variable Syntax • $ singular variables prefix (single value, number or string) • @ prefix for plural variable (array) • %prefix for plural variable (hash) • $_ default variable

10. Review week four lab assignment • Perl Syntax • while ( … ) • { • Action statements • } • if ( …) • { • Action statements • }

11. Review week four lab assignment • Perl Syntax • if ( … ) • { • Action statements • } • else • { • Action statements • }

12. Review week four lab assignment Perl Syntax The Perl language does not support case or switch statements. The closest way to achieve case evaluations is as follows: if ( $condition_one ) {         action_one ();    }    elsif ( $condition_two ) {        action_two ();    }    ...    else {        action_n ();    }

13. Review week four lab assignment • Relational Operators • NumericStringMeaning • >gtGreater than • >= geGreater than or equalto • <ltLess than • <=leLess than or equal to

14. Review week four lab assignment • Equality Operators • NumericStringMeaning • == eq Equal to • != ne Not equal to •  cmp Comparison with signed result • The  or cmpoperators return 1 if the left operand is less than the right operand, 0if they are equal, and +1 it the left operand is greater than the right.

15. Review week four lab assignment Three Types of for loops my @array; # Old style C for loops for (my $i = 0; $i < 10; $i++) {        $array[$i] = $i;    } # Iterating loops    for my $i (@array) {        print "$i\n";    } # Postfix for loops    print "$_\n" for @array;

16. Review week four lab assignment Perl Syntax foreach $total (12,9,3,7) { # Sum each value in the list. $sum += $total; } foreach (-32,10,1,2,0,-1) { # Valid numbers are considered to be greater than zero # The default variable is utilized, if ( $_ > 0 ) { # Print each valid number on a single output line. print "$_\n"; } }

17. Review week four lab assignment • Definition: array • Arrays are an ordered list of scalars, accessed by the scalar’s position in the list. Otherwise known as a collection of scalars. In Perl, a scalar means the simplest data type which was designed to hold only one thing like a number, a string or a reference. • Elements in an array are accessed by using an index. Array indexes start with zero.

18. Review week four lab assignment • Array and Variable Initialization • Initialize an array: • @garage = (“rake”, “mower”, “shovel”); • @persons = (“Will”, “Ken”, “Hazel”, “Jay”); • $count = @persons; • Unload array elements into variables: • ($rake, $mower, $shovel) = @garage

19. Review week four lab assignment • Array Data Structures • array of arrays – Two-dimensional array or a matrix • @names = ( • [ “Sam”, “Clide”, “Kim” ], • [ “Melinda”, Terri”, “Sissy” ], • [ “Fred”, “Omar”, “Vincent” ] ); • print $names [1] [1];

20. Review week four lab assignment • Definition :Hash (associative array) • A hash is similar to an array only because it contains a number of scalars. A hash is different in the case where the element of a structure represents a pair – a key and a value. Whenever we refer to an element of a Perl hash structure, we mean a pair (key and value) which links a value to a key. We have access to the elements of a hash variable by a scalar key. • Hash table is an unordered set of scalars, accessed by some string value that is associated with each scalar.

21. Review week four lab assignment • Hash Initialization • %student_ages = ("John", 43, "Paul", 25, "Marie", 22); • %members = (John => "father", Paul => "son", Marie => "daughter"); • The comma-arrow (=>) operator is used to initialize the %members hash variable in the second line of code. The left side of the comma-arrow operator is expected to be a simple string and therefore it is not necessary to be quoted.

22. Review week four lab assignment • Hash Initialization (con’t) • %all_groups = ( • group_name1 => [ “Betty”, “Tom”, “Moe” ], • group_name2 => [ “Ali”, “Marcia”, “Sis” ] • ); • $all_groups{group_name1} [3] = “Sam”; • for $couple ( keys %all_groups ) { • print “$couple; @{$all_groups{$couple} }\n; • }

23. Review week four lab assignment • Hash Copy • %school_ages = %student_ages • Demonstrate: ~varneyg/hash_table.pl

24. Review week four lab assignment • Hash Table Example • %colormap=( • “12” => “gray”, • “19” => “black”, • “30” => “red”,); • %colormap = (“12”, “gray”, “19”, “black”, “30”, “red”);

25. Review week four lab assignment

26. Review week four lab assignment • Perl utilizes two types of categories • - Singular variables that represent a single-value. The variable prefix symbol for a scalar is the $. • - Plural variables are ones that contain • multiple-values. Arrays and hashes are two • multi-valued variables. • Perl data types • $answer = 42; (an integer) • $pi = 3.14159265;(a “real” number) • $animal = “horse”; (string) • $statement = “I exercise my $animal”; (string with interpolation) • $amount = ‘It cost me $5.00’; (string without interpolation) • $cwd = `pwd`; (string output from a command)

27. Review week four lab assignment • Filehandle is utilized for both input and output files. Most file names are cryptic and are meaningless to programmers. The purpose of a filehandle is to help the programmer remember a simple file name throughout a program. • A filehandle is a name given for a file, device, socket, or pipe. Filehandle command line format: open(filehandle, file name, permissions, chmod); Example: open($FH,$file_name);

28. Review week four lab assignment Practice scripts under /tmp directory on cs.franklin.edu • arry_sort.pl awksrc • read_list.pl • sum_list.pl • hash_table.pl • two_dim.pl • week_four.pl

29. Weeks four and five expected outcomes Write Perl scripts, including variables, control flow, and regular expression syntax

30. Next lab assignment • Regular Expressions • Search programs - grep and findstr. • Text language programs - sed and awk • Text editors – vi and emacs • Many other languages use regular expressions and may advertise a particular Perl version.

31. Next lab assignment • Regular Expression Special Characters • Open square bracket [ • Backslash\ • Caret^ • Dollar sign$ • Dot. • Pipe symbol| • Question mark? • Asterisk* • Plus sign+ • Opening and closing round brackets( )

32. Next lab assignment • Regular Expression (a.k.a. regex or regexp) • Is a pattern that describes a certain amount of text. A basic regular expression could be the single character, e.g.: ‘a ‘ • Jack is a guy. • It will match the first occurrence in the string. If succeeding matches are desired, the regex engine must be instructed to do so.

33. Next lab assignment • Character Classes match only one out of several characters, e.g.: [ae] and gr[ae]y • The order of the characters inside a character class doesn’t matter. • Shorthand Character Classes match single • characters, e.g.: \d and \w and \s and \t • Non-Printable Characters are special character sequence to put non-printable characters in your regular expression, e.g.: \t and \r and \n and \a and \e and \v • Helpful link: • http://www.regular-expressions.info/quickstart.html

34. Next lab assignment • Dot matches almost any character, except line break characters, e.g.: gr.y • Anchors match a position. • Match start of string^ • Match end of a string$ • Alternation is the regular expression equivalent of “or”. The search pattern bird | insect will first return “bird. The second match will be “insect”.

35. Next lab assignment • names • Bo Happy 444-20-2222 01/01/1945 male • Jane Smith 324-78-9990 04/23/1978 female • Razi Jake 564-54-9879 05/26/2005 male • There are tabs in two places in the above data. One tab is after the name and after the birth date.

36. Next lab assignment • Without options, print the desired fields in any order. • awk ‘{ print $1, $2, $3, $4 }’ names • The –F option changes the field separator on the command line. The \t is an Escape Sequence for a horizontal tab. • awk –F”\t” ‘{ print $1 }’ names • Awk Script • # Author: Gary Varney • # Script name: awksrc • # Command line awk -f awksrc test • # Command line: awk -f awksrc • /^$/ { print "This is a blank line." } • /[0-9]+/ { print "That is an integer." } • /[A-Za-z]+/ { print "This is a string." }

37. Next lab assignment • makefile Lab Assignment • Copy the test_build.sh script from ~varneyg/public_html/itec400/make_lab • This script executes the make command which in turn executes the makefile • Demonstrate • ~varneyg/public_html/itec400/make_lab/test_build.sh • View the test_build.sh script

38. Next lab assignment • Programming Perl, Chapter 32 Standard Modules • Define: Module • Parsing the command line with Getopt::Std • Example: listdir –l –n –a 10:00 bottom top • Perl utilizes @ARGV to capture the command line arguments • Example: $ARGV[0] ‘-l’ • $ARGV[1]‘-n’ • $ARGV[2]‘-a’ • $ARGV[3]’10:00’ • $ARGV[4]‘bottom’ • $ARGV[5]‘top’ • Link for getopts example: http://aplawrence.com/Unix/perlgetopts.html

39. Getopts Example • #!/usr/bin/perl • # script is "./g" • use Getopt::Std; • %options=(); • getopts("od:fF",\%options); • # like the shell getopt, "d:" means d takes an argument • print "-o $options{o}\n" if defined $options{o}; • print "-d $options{d}\n" if defined $options{d}; • print "-f $options{f}\n" if defined $options{f}; • print "-F $options{F}\n" if defined $options{F}; • print "Unprocessed by Getopt::Std:\n" • if $ARGV[0]; • foreach (@ARGV) { • print "$_\n"; } • Trying it out: • bash-2.05a$ ./g -o -d foo • -o 1 • –d foo

40. Reading assignments Reading Assignment • Essential System Administration • Chapters 1-3 • Programming Perl • Chapters1-4 • Chapter 32 (review)

41. Upcoming deadlines Simple Perl Exercises, 4-1 is due Feb. 5. Makefile Exercise, 6-2 is due Feb 19. Programming Assignment 1, 6-1 is due Feb 26. Mid-term exam, 7-1 is Feb 13-18. Mid-term outline available at: http://cs.franklin.edu/~varneyg/itec400/StudyGuides/Midterm_Outline.doc

42. Questions and answers Questions? Comments? Concerns? After class I will help students with their scripts.