Fix up more copyrights.

Up past 3:30AM this morning.  Despite a constant stream of caffinated products,
I am incapable of anything more demanding than cut and paste...

testsuite/testswap/Makefile.PL

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use inc::Module::Install;
 
 # Define metadata

testsuite/testswap/TBConfig.pm.in

+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TBConfig;
 
 use SemiModern::Perl;

testsuite/testswap/devtools/podfailure.pl

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use Modern::Perl;
 use File::Temp;
 use Data::Dumper;

testsuite/testswap/install_deps_from_cpan

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
+
 use strict;
 use warnings;
 use CPAN;

testsuite/testswap/lib/SemiModern/Perl.pm

+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use 5.008_000;
 use strict;
 use warnings;

testsuite/testswap/lib/TestBed/Daemonize.pm

+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::Daemonize;
 use SemiModern::Perl;
 

testsuite/testswap/lib/TestBed/ForkFramework.pm

+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 my $FFDEBUG = 0;
 
 package TestBed::ForkFramework::Process;

testsuite/testswap/lib/TestBed/Harness.pm

+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TAP::Parser::Iterator::StdOutErr;
 use strict;
 use warnings;

testsuite/testswap/lib/TestBed/ParallelRunner.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::ParallelRunner;
 use SemiModern::Perl;
 use TestBed::ParallelRunner::Executor;

testsuite/testswap/lib/TestBed/ParallelRunner/ErrorStrategy.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::ParallelRunner::ErrorStrategy;
 use SemiModern::Perl;
 use Mouse;

testsuite/testswap/lib/TestBed/ParallelRunner/Executor.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::ParallelRunner::Executor::Exception;
 use Mouse;
   has original => ( is => 'rw');

testsuite/testswap/lib/TestBed/TestBuilderWrapper.pm

+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::TestBuilderWrapper;
 use Test::Builder;
 

testsuite/testswap/lib/TestBed/TestSuite.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::TestSuite;
 use SemiModern::Perl;
 use TestBed::TestSuite::Experiment;

testsuite/testswap/lib/TestBed/TestSuite/Experiment.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::TestSuite::Experiment;
 use SemiModern::Perl;
 use Mouse;

testsuite/testswap/lib/TestBed/TestSuite/Link.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::TestSuite::Link;
 use SemiModern::Perl;
 use Mouse;

testsuite/testswap/lib/TestBed/TestSuite/Node.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::TestSuite::Node;
 use SemiModern::Perl;
 use Mouse;

testsuite/testswap/lib/TestBed/Wrap/linktest.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::Wrap::linktest;
 use SemiModern::Perl;
 use TBConfig;

testsuite/testswap/lib/TestBed/Wrap/loghole.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::Wrap::loghole;
 use SemiModern::Perl;
 use TBConfig;

testsuite/testswap/lib/TestBed/Wrap/tevc.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::Wrap::tevc;
 use SemiModern::Perl;
 use TBConfig;

testsuite/testswap/lib/TestBed/XMLRPC/Client.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::XMLRPC::Client;
 use SemiModern::Perl;
 use Mouse;

testsuite/testswap/lib/TestBed/XMLRPC/Client/Emulab.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::XMLRPC::Client::Emulab;
 use SemiModern::Perl;
 use Mouse;

testsuite/testswap/lib/TestBed/XMLRPC/Client/Experiment.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::XMLRPC::Client::Experiment;
 use SemiModern::Perl;
 use Mouse;

testsuite/testswap/lib/TestBed/XMLRPC/Client/Node.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::XMLRPC::Client::Node::InsufficientNodes;
 use Mouse;
 

testsuite/testswap/lib/TestBed/XMLRPC/Client/NodeInfo.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::XMLRPC::Client::NodeInfo;
 use SemiModern::Perl;
 require Exporter;

testsuite/testswap/lib/TestBed/XMLRPC/Client/OSID.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::XMLRPC::Client::OSID;
 use SemiModern::Perl;
 use Mouse;

testsuite/testswap/lib/TestBed/XMLRPC/Client/Pretty.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TestBed::XMLRPC::Client::Pretty;
 use SemiModern::Perl;
 require Exporter;

testsuite/testswap/lib/Tools.pm

 package Tools;
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use Log::Log4perl qw(get_logger :levels);
 use POSIX qw(setsid);

testsuite/testswap/lib/Tools/Network.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package Tools::Network;
 use SemiModern::Perl;
 use Net::Ping;

testsuite/testswap/lib/Tools/PerlSSH.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package Tools::PerlSSH;
 use SemiModern::Perl;
 use Net::SSH::Perl;

testsuite/testswap/lib/Tools/TBSSH.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package Tools::TBSSH;
 use SemiModern::Perl;
 use Data::Dumper;

testsuite/testswap/lib/Tools/WrappedSSH.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package Tools::WrappedSSH;
 use SemiModern::Perl;
 use Data::Dumper;

testsuite/testswap/run_single_test_with_args

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 BEGIN {
   #add localcpan path to library search path
   if (-f glob("~/lib/perl5/Test/Harness.pm")) {

testsuite/testswap/sc

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 BEGIN {
   #add localcpan path to library search path
   if (-f glob("~/lib/perl5/Test/Harness.pm")) {

testsuite/testswap/t/coding/pod_coverage.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use Test::More;
 eval "use Test::Pod::Coverage 1.00";
 if ( $@ ) {

testsuite/testswap/t/eine/elab_in_elab.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TBConfig;
 use TestBed::TestSuite;

testsuite/testswap/t/lib/testbed/forkframework.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::ForkFramework;
 use TestBed::ParallelRunner::Executor;

testsuite/testswap/t/lib/testbed/testsuite.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TBConfig;
 use TestBed::TestSuite;

testsuite/testswap/t/lib/tools.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TBConfig;
 use Tools;

testsuite/testswap/t/lib/tools/network.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TBConfig;
 use Tools::Network;

testsuite/testswap/t/lib/tools/ssh.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TBConfig;
 use Tools;

testsuite/testswap/t/livetests/ensure_active.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More tests => 7;

testsuite/testswap/t/noautorun/tbts_cmdlineargs.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TBConfig;
 use Data::Dumper;

testsuite/testswap/t/tbts/cmdlineargs.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TBConfig;
 use Data::Dumper;

testsuite/testswap/t/xmlrpc/emulab.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 
 use TestBed::XMLRPC::Client::Emulab;

testsuite/testswap/t/xmlrpc/experiment.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More tests => 3;;

testsuite/testswap/t/xmlrpc/node.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::XMLRPC::Client::Node;
 use Data::Dumper;

testsuite/testswap/t/xmlrpc/osid.t

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 
 use TestBed::XMLRPC::Client::OSID;

testsuite/testswap/tbts

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 BEGIN {
   #add localcpan path to library search path
   if (-f glob("~/lib/perl5/Test/Harness.pm")) {

testsuite/testswap/tests/BasicNSs.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 package BasicNSs;
 

testsuite/testswap/tests/BasicTopologies.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use BasicNSs;

testsuite/testswap/tests/ImageTests.pm

 package ImageTests;
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More;

testsuite/testswap/tests/OldTestSuite.pm

+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package OldTestSuite;
 
 our $tests = {

testsuite/testswap/tests/OldTestSuiteTests.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More;

testsuite/testswap/tests/RateLimitParallelExample.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package RateLimitParallelExample;
 use TestBed::TestSuite;
 use BasicNSs;

testsuite/testswap/tests/SyncTests.pm

+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package SyncTests;
 use SemiModern::Perl;
 use TestBed::TestSuite;

testsuite/testswap/tests/TooManyLans.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package TooManyLans;
 use SemiModern::Perl;
 use TestBed::TestSuite;

testsuite/testswap/tests/Trafficgen.pm

+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package Event;
 use SemiModern::Perl;
 use Mouse;

testsuite/testswap/tests/VNodeTest.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 package VNodeTest;
 use SemiModern::Perl;
 use TestBed::TestSuite;

testsuite/testswap/tests/features/features.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More;

testsuite/testswap/tests/topologies/link_up_link_down.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More;

testsuite/testswap/tests/topologies/simple_two_node_linktest.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More;

testsuite/testswap/tests/topologies/single_node.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More;

testsuite/testswap/tests/topologies/two_node_lan.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More;

testsuite/testswap/tests/xen/xen.pm

 #!/usr/bin/perl
+#
+# EMULAB-COPYRIGHT
+# Copyright (c) 2009 University of Utah and the Flux Group.
+# All rights reserved.
+#
 use SemiModern::Perl;
 use TestBed::TestSuite;
 use Test::More;

testsuite/virt/ops/bw-run.pl

 #!/usr/bin/perl
+#