<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML xmlns="http://www.w3.org/TR/REC-html40" xmlns:o =
"urn:schemas-microsoft-com:office:office" xmlns:w =
"urn:schemas-microsoft-com:office:word"><HEAD>
<META http-equiv=Content-Type content="text/html; charset=us-ascii">
<META content="MSHTML 6.00.2800.1400" name=GENERATOR>
<STYLE>@page Section1 {size: 8.5in 11.0in; margin: 1.0in 1.25in 1.0in 1.25in; }
P.MsoNormal {
FONT-SIZE: 12pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Times New Roman"
}
LI.MsoNormal {
FONT-SIZE: 12pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Times New Roman"
}
DIV.MsoNormal {
FONT-SIZE: 12pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Times New Roman"
}
A:link {
COLOR: blue; TEXT-DECORATION: underline
}
SPAN.MsoHyperlink {
COLOR: blue; TEXT-DECORATION: underline
}
A:visited {
COLOR: purple; TEXT-DECORATION: underline
}
SPAN.MsoHyperlinkFollowed {
COLOR: purple; TEXT-DECORATION: underline
}
P.MsoPlainText {
FONT-SIZE: 10pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Courier New"
}
LI.MsoPlainText {
FONT-SIZE: 10pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Courier New"
}
DIV.MsoPlainText {
FONT-SIZE: 10pt; MARGIN: 0in 0in 0pt; FONT-FAMILY: "Courier New"
}
P {
FONT-SIZE: 12pt; MARGIN-LEFT: 0in; MARGIN-RIGHT: 0in; FONT-FAMILY: "Times New Roman"; mso-margin-top-alt: auto; mso-margin-bottom-alt: auto
}
SPAN.EmailStyle17 {
COLOR: windowtext; FONT-FAMILY: Arial; mso-style-type: personal-compose
}
DIV.Section1 {
page: Section1
}
</STYLE>
</HEAD>
<BODY lang=EN-US vLink=purple link=blue>
<DIV dir=ltr align=left><SPAN class=481005316-14032006><FONT face=Arial
color=#0000ff size=2>This is what I use. It does everything, creates
tickets, does parent-child relationships, and fills in some custom fields.
You'd have to change the custom fields and library locations to suit your
installation (or just don't use those options). I find this easier to
use than the rt CLI which has limited options.</FONT></SPAN></DIV>
<DIV dir=ltr align=left><SPAN class=481005316-14032006><FONT face=Arial
color=#0000ff size=2></FONT></SPAN> </DIV>
<DIV dir=ltr align=left><SPAN class=481005316-14032006><FONT face=Arial
color=#0000ff
size=2>-----------------------------------------------------</FONT></SPAN></DIV>
<DIV dir=ltr align=left><SPAN class=481005316-14032006><FONT face=Arial
color=#0000ff size=2></FONT></SPAN> </DIV>
<DIV dir=ltr align=left><SPAN class=481005316-14032006><FONT face=Arial
color=#0000ff size=2>#!/usr/bin/perl -w</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>use lib
("/opt/rt3/local/lib","/opt/rt3/lib");</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>use
RT::Interface::CLI;</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>use RT;</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>use RT::Ticket;</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>use
RT::CurrentUser;</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>use
Getopt::Long;</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>$queue = '';</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>$body = '';</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>GetOptions ("queue=s" =>
\$queue,</FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"subject=s" => \$subject,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"owner=s" => \$owner,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"requestor=s" => \$requestor,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"priority=s" => \$priority,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"body=s" => \$body,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"AdminCc=s" => \$AdminCc,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"cc=s" => \$cc,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"site=s" => \$site,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"work_type=s" => \$work_type,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"department=s" => \$department,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"group=s" => \$group,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"RefersTo=s" => \$RefersTo,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"ReferredToBy=s" => \$ReferredToBy,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"DependsOn=s" => \$DependsOn,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>"Parents=s" => \$Parents</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff size=2>);</FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2></FONT> </DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2># setting some
defaults</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>if ($queue eq
'')</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>{</FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print_usage();</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>exit (0);</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>}</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>if ($body eq '')</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>{</FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>$body=' ';</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>}</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff
size=2>RT::LoadConfig();</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>RT::Init();</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>if ($owner eq '') {$owner =
'Nobody';}</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>my $CurrentUser =
RT::Interface::CLI::GetCurrentUser();</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>use
MIME::Entity;</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>my $ticket = new
RT::Ticket($CurrentUser);</FONT></DIV>
<DIV dir=ltr><FONT size=2><FONT face=Arial color=#0000ff>my $ticket_body =
MIME::Entity->build(Data => $body,</FONT><FONT face=Arial
color=#0000ff>Type => 'text/plain');</FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>my %ticket_vals = ( Queue
=> $queue,</FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>Subject => $subject,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>Owner => $owner,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>Requestor => $requestor,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>InitialPriority => $priority,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN># FinalPriority => '0',</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>MIMEObj => $ticket_body,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>AdminCc => $AdminCc,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>Cc => $cc,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>'CustomField-1' => $site,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>'CustomField-2' => $work_type,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>'CustomField-9' => $department,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>'CustomField-14' => $group,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>'RefersTo' => $RefersTo,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>'ReferredToBy' => $ReferredToBy,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>'DependsOn' => $DependsOn,</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>'MemberOf' => $Parents</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>);</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2></FONT> </DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>my ($id, $transaction_object,
$err) = $ticket->Create(%ticket_vals);</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>print STDERR $err . "\n" if
$err;</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>sub print_usage</FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>{</FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "\nusage: rt_custom.pl -queue <rt queue> [optional
parameters]\n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "\nThe queue name is manditory but all other parameters are
optional.\n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "The following options are
supported:\n\n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-subject <subject> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-owner <owner> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-requestor <requestor e-mail>
\n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-priority <Initial Priority> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-AdminCc <AdminCc> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-cc <Cc> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-site <site> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-work_type <Work Type> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-department <department> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-group <Group Performed By>\n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-subject <subject> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-body <ticket body> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-RefersTo <Refers To> \n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-ReferredToBy <Referred To By>
\n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-DependsOn <Depends On>\n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "-Parents <Parents>\n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial><FONT color=#0000ff><FONT size=2><SPAN
class=481005316-14032006>
</SPAN>print "\nExample: ./rt_custom.pl -queue=\"Development\" -subject=\"This
is a test subject for test script\" -owner='bob' -requestor='bob\@bob.com'
-priority=99 -body=\"This is the body of the ticket\"
-AdminCc=\"bobsboss\@bob.com\" -cc=\"bobswife\@bob.com\"
-site=\"secure.bob.com\" -work_type=\"Task\" -department=\"bob business
unit\"\n\n";</FONT></FONT></FONT></DIV>
<DIV dir=ltr><FONT face=Arial color=#0000ff size=2>}</FONT></DIV>
<DIV dir=ltr align=left>
<P><FONT face=Arial color=#0000ff size=2><SPAN
class=481005316-14032006>----------------------------------------------------------------</SPAN></FONT></P></SPAN></DIV><BR>
<DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left>
<HR tabIndex=-1>
<FONT face=Tahoma size=2><B>From:</B> rt-users-bounces@lists.bestpractical.com
[mailto:rt-users-bounces@lists.bestpractical.com] <B>On Behalf Of </B>Nick
Metrowsky<BR><B>Sent:</B> Tuesday, March 14, 2006 11:36 AM<BR><B>To:</B>
rt-users@lists.bestpractical.com<BR><B>Subject:</B> [rt-users] Creating a Link
to a Ticket via a Perl Script<BR></FONT><BR></DIV>
<DIV></DIV>
<DIV class=Section1>
<P class=MsoNormal><FONT face=Arial size=2><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">Hi
Everyone,<o:p></o:p></SPAN></FONT></P>
<P class=MsoNormal><FONT face=Arial size=2><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: Arial"><o:p> </o:p></SPAN></FONT></P>
<P class=MsoNormal><FONT face=Arial size=2><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">Does anyone have a code snippet that
depicts the method for linking one ticket to another using a perl script? It
would be even better if the snippet was part of code that was used to create a
new ticket and link to either existing ticket or a
URI.<o:p></o:p></SPAN></FONT></P>
<P class=MsoNormal><FONT face=Arial size=2><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: Arial"><o:p> </o:p></SPAN></FONT></P>
<P class=MsoNormal><FONT face=Arial size=2><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">Take
care!<o:p></o:p></SPAN></FONT></P>
<P class=MsoNormal><FONT face=Arial size=2><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: Arial"><o:p> </o:p></SPAN></FONT></P>
<P class=MsoNormal><FONT face=Arial size=2><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">Nick<o:p></o:p></SPAN></FONT></P>
<P class=MsoNormal><FONT face=Arial size=2><SPAN
style="FONT-SIZE: 10pt; FONT-FAMILY: Arial"><o:p> </o:p></SPAN></FONT></P>
<P style="MARGIN: 0in 0in 0pt; TEXT-INDENT: -7.5pt"><B><FONT face=Arial
size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 7.5pt; FONT-FAMILY: Arial">---------------------------------------------------------------------------------</SPAN></FONT></B><o:p></o:p></P>
<P style="MARGIN: 0in 0in 0pt; TEXT-INDENT: -7.5pt"><B><FONT face=Arial
size=1><SPAN style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; FONT-FAMILY: Arial">Nick
Metrowsky</SPAN></FONT></B><B><FONT size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 8pt"><o:p></o:p></SPAN></FONT></B></P>
<P style="MARGIN: 0in 0in 0pt; TEXT-INDENT: -7.5pt"><B><FONT face=Arial
size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; FONT-FAMILY: Arial">Consulting System
Administrator</SPAN></FONT></B><B><FONT size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 8pt"><o:p></o:p></SPAN></FONT></B></P>
<P style="MARGIN: 0in 0in 0pt; TEXT-INDENT: -7.5pt"><B><FONT face=Arial
size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; FONT-FAMILY: Arial">303-684-4785
Office</SPAN></FONT></B><B><FONT size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 8pt"><o:p></o:p></SPAN></FONT></B></P>
<P style="MARGIN: 0in 0in 0pt; TEXT-INDENT: -7.5pt"><B><FONT face=Arial
size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; FONT-FAMILY: Arial">303-684-4100
Fax</SPAN></FONT></B><B><FONT size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 8pt"><o:p></o:p></SPAN></FONT></B></P>
<P style="MARGIN: 0in 0in 0pt; TEXT-INDENT: -7.5pt"><B><FONT face=Arial
size=1><SPAN style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; FONT-FAMILY: Arial"><A
href="mailto:nmetrowsky@digitalglobe.com"><FONT size=1><SPAN
style="FONT-SIZE: 7.5pt">nmetrowsky@digitalglobe.com</SPAN></FONT></A></SPAN></FONT></B><B><FONT
size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 8pt"><o:p></o:p></SPAN></FONT></B></P>
<P style="MARGIN: 0in 0in 0pt; TEXT-INDENT: -7.5pt"><B><FONT face=Arial
size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 7.5pt; FONT-FAMILY: Arial">DigitalGlobe ®,
An Imaging and Information Company</SPAN></FONT></B><o:p></o:p></P>
<P style="MARGIN: 0in 0in 0pt; TEXT-INDENT: -7.5pt"><B><FONT face=Arial
size=1><SPAN style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; FONT-FAMILY: Arial"><A
href="http://www.digitalglobe.com"><FONT size=1><SPAN
style="FONT-SIZE: 7.5pt">http://www.digitalglobe.com</SPAN></FONT></A></SPAN></FONT></B><o:p></o:p></P>
<P style="MARGIN: 0in 0in 0pt; TEXT-INDENT: -7.5pt"><B><FONT face=Arial
size=1><SPAN
style="FONT-WEIGHT: bold; FONT-SIZE: 7.5pt; FONT-FAMILY: Arial">---------------------------------------------------------------------------------</SPAN></FONT></B><o:p></o:p></P>
<P class=MsoNormal><FONT face="Times New Roman" size=3><SPAN
style="FONT-SIZE: 12pt"><o:p> </o:p></SPAN></FONT></P></DIV></BODY></HTML>