<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<meta name="Generator" content="Microsoft Word 12 (filtered medium)">
<style><!--
/* Font Definitions */
@font-face
{font-family:"Cambria Math";
panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
{font-family:Consolas;
panose-1:2 11 6 9 2 2 4 3 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0in;
margin-bottom:.0001pt;
font-size:11.0pt;
font-family:"Calibri","sans-serif";}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
p.MsoPlainText, li.MsoPlainText, div.MsoPlainText
{mso-style-priority:99;
mso-style-link:"Plain Text Char";
margin:0in;
margin-bottom:.0001pt;
font-size:10.5pt;
font-family:Consolas;}
pre
{mso-style-priority:99;
mso-style-link:"HTML Preformatted Char";
margin:0in;
margin-bottom:.0001pt;
font-size:10.0pt;
font-family:"Courier New";}
p.MsoListParagraph, li.MsoListParagraph, div.MsoListParagraph
{mso-style-priority:34;
margin-top:0in;
margin-right:0in;
margin-bottom:0in;
margin-left:.5in;
margin-bottom:.0001pt;
font-size:11.0pt;
font-family:"Calibri","sans-serif";}
span.HTMLPreformattedChar
{mso-style-name:"HTML Preformatted Char";
mso-style-priority:99;
mso-style-link:"HTML Preformatted";
font-family:"Courier New";}
span.EmailStyle20
{mso-style-type:personal;
font-family:"Calibri","sans-serif";
color:windowtext;}
span.shsymbol
{mso-style-name:sh_symbol;}
span.EmailStyle22
{mso-style-type:personal-reply;
font-family:"Calibri","sans-serif";
color:#1F497D;}
span.PlainTextChar
{mso-style-name:"Plain Text Char";
mso-style-priority:99;
mso-style-link:"Plain Text";
font-family:Consolas;}
.MsoChpDefault
{mso-style-type:export-only;
font-size:10.0pt;}
@page WordSection1
{size:8.5in 11.0in;
margin:1.0in 1.0in 1.0in 1.0in;}
div.WordSection1
{page:WordSection1;}
/* List Definitions */
@list l0
{mso-list-id:270750268;
mso-list-type:hybrid;
mso-list-template-ids:-985077962 542653864 67698691 67698693 67698689 67698691 67698693 67698689 67698691 67698693;}
@list l0:level1
{mso-level-start-at:0;
mso-level-number-format:bullet;
mso-level-text:-;
mso-level-tab-stop:none;
mso-level-number-position:left;
margin-left:20.25pt;
text-indent:-.25in;
font-family:"Calibri","sans-serif";
mso-fareast-font-family:Calibri;
mso-bidi-font-family:"Times New Roman";}
@list l0:level2
{mso-level-number-format:bullet;
mso-level-text:o;
mso-level-tab-stop:none;
mso-level-number-position:left;
margin-left:56.25pt;
text-indent:-.25in;
font-family:"Courier New";}
@list l0:level3
{mso-level-tab-stop:1.5in;
mso-level-number-position:left;
text-indent:-.25in;}
@list l0:level4
{mso-level-tab-stop:2.0in;
mso-level-number-position:left;
text-indent:-.25in;}
@list l0:level5
{mso-level-tab-stop:2.5in;
mso-level-number-position:left;
text-indent:-.25in;}
@list l0:level6
{mso-level-tab-stop:3.0in;
mso-level-number-position:left;
text-indent:-.25in;}
@list l0:level7
{mso-level-tab-stop:3.5in;
mso-level-number-position:left;
text-indent:-.25in;}
@list l0:level8
{mso-level-tab-stop:4.0in;
mso-level-number-position:left;
text-indent:-.25in;}
@list l0:level9
{mso-level-tab-stop:4.5in;
mso-level-number-position:left;
text-indent:-.25in;}
ol
{margin-bottom:0in;}
ul
{margin-bottom:0in;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang="EN-US" link="blue" vlink="purple">
<div class="WordSection1">
<p class="MsoNormal"><span style="color:#1F497D">I figured out how to get make test to work.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="color:#1F497D"><o:p> </o:p></span></p>
<p class="MsoNormal"><span style="color:#1F497D">I took a guess and removed the -T flag from the test script and 'make test' now works. I think Module::Starter puts that into the 00-load.t test by default.<o:p></o:p></span></p>
<p class="MsoPlainText"><o:p> </o:p></p>
<p class="MsoNormal"><span style="color:#1F497D"><o:p> </o:p></span></p>
<div>
<p class="MsoNormal" style="margin-top:5.0pt;text-autospace:none"><span style="font-family:"Arial","sans-serif";color:navy">Jerry Ursetti<o:p></o:p></span></p>
<p class="MsoNormal" style="text-autospace:none"><b><span style="font-size:10.0pt;font-family:"Courier New";color:navy"> __ __ __
<br>
/_ / | (_ /\/\<o:p></o:p></span></b></p>
<p class="MsoNormal" style="text-autospace:none"><b><span style="font-size:10.0pt;font-family:"Courier New";color:navy">/ /__/ _ ) / \</span></b><b><span style="font-family:"Courier New";color:#1F497D"><o:p></o:p></span></b></p>
<p class="MsoNormal" style="margin-top:5.0pt;text-autospace:none"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:navy">Financial Data Systems and Analytics Management</span><span style="font-family:"Times New Roman","serif";color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal" style="margin-top:3.0pt;text-autospace:none"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:navy">(805)557-4212 (Work)<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-top:3.0pt;text-autospace:none"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:navy">(805)732-8484 (Blackberry)<o:p></o:p></span></p>
</div>
<p class="MsoNormal"><span style="color:#1F497D"><o:p> </o:p></span></p>
<div>
<div style="border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0in 0in 0in">
<p class="MsoNormal"><b><span style="font-size:10.0pt;font-family:"Tahoma","sans-serif"">From:</span></b><span style="font-size:10.0pt;font-family:"Tahoma","sans-serif""> Thousand-Oaks-pm [mailto:thousand-oaks-pm-bounces+jerry.ursetti=wellpoint.com@pm.org]
<b>On Behalf Of </b>Ursetti, Jerry<br>
<b>Sent:</b> Monday, November 05, 2012 11:50 AM<br>
<b>To:</b> thousand-oaks-pm@pm.org<br>
<b>Subject:</b> [Thousand-Oaks-pm] Perl testing issue<o:p></o:p></span></p>
</div>
</div>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">I’m hoping some of the Perl test experts in the group can help me out. I’m trying to do more testing of my modules. I haven’t completely made it to TDD, but I am doing more testing. For the most part this is going OK. I’ve just run into
an odd problem that has me stumped.<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">I’m testing a module that uses one of my other modules. The second module uses the DateTime module and includes code to assign the local timezone to a variable. It sort of works like this:<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">My module…<o:p></o:p></p>
<p class="MsoNormal">…<o:p></o:p></p>
<p class="MsoNormal">Use WLP::UTILS;<o:p></o:p></p>
<p class="MsoListParagraph" style="margin-left:20.25pt;text-indent:-.25in;mso-list:l0 level1 lfo2">
<![if !supportLists]><span style="mso-list:Ignore">-<span style="font:7.0pt "Times New Roman"">
</span></span><![endif]>WLP::UTILS module…<o:p></o:p></p>
<p class="MsoListParagraph" style="margin-left:56.25pt;text-indent:-.25in;mso-list:l0 level2 lfo2">
<![if !supportLists]><span style="font-family:"Courier New""><span style="mso-list:Ignore">o<span style="font:7.0pt "Times New Roman"">
</span></span></span><![endif]>Use DateTime;<o:p></o:p></p>
<p class="MsoListParagraph" style="margin-left:56.25pt;text-indent:-.25in;mso-list:l0 level2 lfo2">
<![if !supportLists]><span style="font-family:"Courier New""><span style="mso-list:Ignore">o<span style="font:7.0pt "Times New Roman"">
</span></span></span><![endif]>our $localtz = DateTime::TimeZone->new( name => 'local' );<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">I’m having trouble with the most basic test, just trying to use my module:<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal" style="margin-left:.5in"><span style="font-size:10.0pt;font-family:"Courier New"">#!perl -T<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:.5in"><span style="font-size:10.0pt;font-family:"Courier New"">use Test::More tests => 1;<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:.5in"><span style="font-size:10.0pt;font-family:"Courier New"">BEGIN {<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:.5in"><span style="font-size:10.0pt;font-family:"Courier New""> use_ok( 'WLP::TeradataBTEQ' );<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:.5in"><span style="font-size:10.0pt;font-family:"Courier New"">}<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-left:.5in"><span style="font-size:10.0pt;font-family:"Courier New"">diag( "Testing WLP::TeradataBTEQ $WLP::TeradataBTEQ::VERSION, Perl $], $^X" );<o:p></o:p></span></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">When I run ‘make test’, the test fails with this error:<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal" style="margin-left:.5in">‘Error: Cannot determine local time zone’<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">If I run the test script directly, ‘perl –T t/00-load.t’, the test passes.<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">I tried using the $TZ environment variable instead of ‘local’, in WLP::UTILS. ($TZ is defined in my environment.) That gives me an ‘Unknown error’ with ‘make test’ but it still passes when run directly.<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">The only way I can get this to work with ‘make test’ is to hardcode the timezone in WLP::UTILS, replacing ‘local’ with ‘PST8PDT’. I really don’t want to hardcode this.<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">It seems like somehow the environment isn’t quite right when I run the test via ‘make test’ so when DateTime tries to get the local timezone, it can’t figure it out.<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">Can I add something to Makefile.PL to make sure the timezone is in the environment? I checked the ExtUtils::MakeMaker pod but didn’t see anything obvious that looked like it would set environment variables. I tried looking at the Test::Harness
pod and code but didn’t see anything there that might help explain what was going wrong, either.<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">Does anyone have any ideas? <o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">I’m running Perl 5.8.8 on AIX 6.1.<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal">Thanks.<o:p></o:p></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal" style="margin-top:5.0pt;text-autospace:none"><span style="font-family:"Arial","sans-serif";color:navy">Jerry Ursetti<o:p></o:p></span></p>
<p class="MsoNormal" style="text-autospace:none"><b><span style="font-size:10.0pt;font-family:"Courier New";color:navy"> __ __ __
<br>
/_ / | (_ /\/\<o:p></o:p></span></b></p>
<p class="MsoNormal" style="text-autospace:none"><b><span style="font-size:10.0pt;font-family:"Courier New";color:navy">/ /__/ _ ) / \</span></b><b><span style="font-family:"Courier New""><o:p></o:p></span></b></p>
<p class="MsoNormal" style="margin-top:5.0pt;text-autospace:none"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:navy">Financial Data Systems and Analytics Management</span><span style="font-family:"Times New Roman","serif""><o:p></o:p></span></p>
<p class="MsoNormal" style="margin-top:3.0pt;text-autospace:none"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:navy">(805)557-4212 (Work)<o:p></o:p></span></p>
<p class="MsoNormal" style="margin-top:3.0pt;text-autospace:none"><span style="font-size:10.0pt;font-family:"Arial","sans-serif";color:navy">(805)732-8484 (Blackberry)<o:p></o:p></span></p>
<p class="MsoNormal"><o:p> </o:p></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Times New Roman","serif""><br clear="all">
<o:p></o:p></span></p>
<p class="MsoNormal"><b><span style="font-size:12.0pt;font-family:"Arial","sans-serif"">CONFIDENTIALITY NOTICE:</span></b><span style="font-size:12.0pt;font-family:"Arial","sans-serif""> This e-mail message, including any attachments, is<br>
for the sole use of the intended recipient(s) and may contain confidential<br>
and privileged information or otherwise be protected by law. Any<br>
unauthorized review, use, disclosure or distribution is prohibited. If you<br>
are not the intended recipient, please contact the sender by reply e-mail<br>
and destroy all copies of the original message.</span><span style="font-size:12.0pt;font-family:"Times New Roman","serif"">
</span><span style="font-size:12.0pt;font-family:"Arial","sans-serif""><o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:12.0pt;font-family:"Times New Roman","serif""><br>
CONFIDENTIALITY NOTICE: This e-mail message, including any attachments, is for the sole use of the intended recipient(s) and may contain confidential and privileged information or otherwise protected by law. Any unauthorized review, use, disclosure or distribution
is prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message.
<o:p></o:p></span></p>
</div>
<br clear=all> <html>
<body lang=EN-US style='tab-interval:.5in'>
<b style='mso-bidi-font-weight:normal'><span
style='font-size:12.0pt;line-height:115%;font-family:"Arial","sans-serif"'>CONFIDENTIALITY
NOTICE:</span></b><span style='font-size:12.0pt;line-height:115%;font-family:
"Arial","sans-serif"'> This e-mail message, including any attachments, is<br>
for the sole use of the intended recipient(s) and may contain confidential<br>
and privileged information or otherwise be protected by law. Any<br>
unauthorized review, use, disclosure or distribution is prohibited. If you<br>
are not the intended recipient, please contact the sender by reply e-mail<br>
and destroy all copies of the original message.<o:p></o:p></span>
</body>
</html>
</body>
</html>
<BR>
CONFIDENTIALITY NOTICE: This e-mail message, including any attachments, is for the sole use of the intended recipient(s) and may contain confidential and privileged information or otherwise protected by law. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message.