2 ################################################################################
4 # File: $RCSfile: testmail.pl,v $
5 # Revision: $Revision: 1.1 $
6 # Description: Tests Mail.pm
7 # Author: Andrew@DeFaria.com
8 # Created: Wed Aug 1 09:16:42 MST 2007
9 # Modified: $Date: 2007/12/07 05:52:36 $
12 # (c) Copyright 2007, ClearSCM, Inc., all rights reserved
14 ################################################################################
20 use lib "$FindBin::Bin/../lib";
26 <table cellspacing=0 border=1>
29 <td align=center>RANCQ00008837</td>
30 <td>Add new VOB to other projects</td>
31 <td align=center>NeedingInfo</td>
32 <td align=center>p6258c</td>
33 <td align=center>p5602c</td>
34 <td align=center>2007-07-26 15:19:53</td>
37 <td align=center>RANCQ00012317</td>
38 <td>RoseRT Crashing</td>
39 <td align=center>NeedingInfo</td>
40 <td align=center>p6258c</td>
41 <td align=center>p29353</td>
42 <td align=center>2007-07-18 11:49:57</td>
45 <td align=center>RANCQ00012821</td>
46 <td>http://ranweb requests</td>
47 <td align=center>Verifying</td>
48 <td align=center>p6258c</td>
49 <td align=center>p6001c</td>
50 <td align=center>2007-07-26 15:40:47</td>
53 <td align=center>RANCQ00012830</td>
54 <td>Not all errors are being reported when doing rebase from UCM GUI.</td>
55 <td align=center>NeedingInfo</td>
56 <td align=center>p6258c</td>
57 <td align=center>p57413</td>
58 <td align=center>2007-07-26 11:40:37</td>
69 my $heading = "<h1>Helpdesk Report as of 20070801</h1>";
70 my $subject = "Helpdesk Report";
71 my $to = "Andrew\@DeFaria.com";
74 display "Calling mail";
85 display "Called mail";