COSC 465 Final Exam

Solutions

  1. b
  2. a
  3. a
  4. b
  5. c
  6. d
  7. c
  8. c
  9. a, c, f
  10. c, d
  11. b, c, d
  12. c, d
  13. b, d, f
  14. b, c, d
  15. a, c, d, e, h
  16. a, c, d
  17. a, d, e, h
  18. a, e, g
  19. b, d, e
  20. c, g
    1. php
    2. perl
    3. javascript
    4. xml
  22. b
  23. e, g
  24. a
  25. d
  26. a
    1. /^[A-Z][a-z]*( [A-Z][a-z]*)*$/
    2. /^\d{2}(-\d{4,6})(-[a-z]{1,3})?$/ 
  29. sub duplicateLines {
    my ($filename) = @_;
    open(FILE, $filename) or die;
    %lines = ();
    my $lineCount = 1;
    my $duplicate = 0;
    while (chomp($line = )) {
	if (exists($lines{$line})) {
	    print "lines $lines{$line} and $lineCount are duplicates\n";
	    $duplicate = 1;
        }
	else {
	    $lines{$line} = $lineCount;
	}
	$lineCount++;
    }
    return $duplicate;
}