<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:st1="urn:schemas-microsoft-com:office:smarttags" xmlns="http://www.w3.org/TR/REC-html40">

<head>
<meta http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<meta name=Generator content="Microsoft Word 11 (filtered medium)">
<!--[if !mso]>
<style>
v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style>
<![endif]--><o:SmartTagType
 namespaceuri="urn:schemas-microsoft-com:office:smarttags" name="PersonName"/>
<!--[if !mso]>
<style>
st1\:*{behavior:url(#default#ieooui) }
</style>
<![endif]-->
<style>
<!--
 /* Font Definitions */
 @font-face
        {font-family:Wingdings;
        panose-1:5 0 0 0 0 0 0 0 0 0;}
@font-face
        {font-family:Tahoma;
        panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
        {font-family:"Comic Sans MS";
        panose-1:3 15 7 2 3 3 2 2 2 4;}
 /* Style Definitions */
 p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0cm;
        margin-bottom:.0001pt;
        font-size:12.0pt;
        font-family:"Times New Roman";}
a:link, span.MsoHyperlink
        {color:blue;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {color:blue;
        text-decoration:underline;}
span.EstiloDeEmail17
        {mso-style-type:personal-reply;
        font-family:Arial;
        color:navy;}
@page Section1
        {size:612.0pt 792.0pt;
        margin:70.85pt 3.0cm 70.85pt 3.0cm;}
div.Section1
        {page:Section1;}
 /* List Definitions */
 @list l0
        {mso-list-id:781263353;
        mso-list-type:hybrid;
        mso-list-template-ids:-1209773644 68550673 68550681 68550683 68550671 68550681 68550683 68550671 68550681 68550683;}
@list l0:level1
        {mso-level-text:"%1\)";
        mso-level-tab-stop:36.0pt;
        mso-level-number-position:left;
        text-indent:-18.0pt;}
@list l1
        {mso-list-id:1335450546;
        mso-list-type:hybrid;
        mso-list-template-ids:1921827708 -1219349356 68550659 68550661 68550657 68550659 68550661 68550657 68550659 68550661;}
@list l1:level1
        {mso-level-number-format:bullet;
        mso-level-text:\F0B7;
        mso-level-tab-stop:36.0pt;
        mso-level-number-position:left;
        text-indent:-18.0pt;
        font-family:Symbol;
        mso-fareast-font-family:"Times New Roman";
        mso-bidi-font-family:Arial;}
ol
        {margin-bottom:0cm;}
ul
        {margin-bottom:0cm;}
-->
</style>

</head>

<body lang=PT-BR link=blue vlink=blue>

<div class=Section1>

<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'>Caros,<o:p></o:p></span></font></p>

<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'>vamos lá, demorou um pouco mas FUNCIONOU!!!<o:p></o:p></span></font></p>

<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p>&nbsp;</o:p></span></font></p>

<p class=MsoNormal style='margin-left:36.0pt;text-indent:-18.0pt;mso-list:l0 level1 lfo1'><![if !supportLists]><font
size=2 color=navy face=Arial><span style='font-size:10.0pt;font-family:Arial;
color:navy'><span style='mso-list:Ignore'>1)<font size=1 face="Times New Roman"><span
style='font:7.0pt "Times New Roman"'>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </span></font></span></span></font><![endif]><font
size=2 color=navy face=Arial><span style='font-size:10.0pt;font-family:Arial;
color:navy'>Acabei baixando o ActivePerl em minha máquina &#8211; v5.10.0 e
executei o Script localmente;<o:p></o:p></span></font></p>

<p class=MsoNormal style='margin-left:36.0pt;text-indent:-18.0pt;mso-list:l0 level1 lfo1'><![if !supportLists]><font
size=2 color=navy face=Arial><span style='font-size:10.0pt;font-family:Arial;
color:navy'><span style='mso-list:Ignore'>2)<font size=1 face="Times New Roman"><span
style='font:7.0pt "Times New Roman"'>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </span></font></span></span></font><![endif]><font
size=2 color=navy face=Arial><span style='font-size:10.0pt;font-family:Arial;
color:navy'>O erro continuou, aí segui a sugestão da mensagem abaixo (Breno) &#8211;
&#8220;</span></font>Ou experimente (via Windows Explorer mesmo)<br>
criar um diretório &quot;Class&quot; dentro de D:\Aplicacao\Perl\site\lib e mover/copiar
o seu &quot;Date.pm&quot; &#8211; Criada a pasta e executado o Script. Este
rodou mas apresentou outro problema (ver item 3).<font size=2 color=navy
face=Arial><span style='font-size:10.0pt;font-family:Arial;color:navy'><o:p></o:p></span></font></p>

<p class=MsoNormal style='margin-left:36.0pt;text-indent:-18.0pt;mso-list:l0 level1 lfo1'><![if !supportLists]><font
size=2 color=navy face=Arial><span style='font-size:10.0pt;font-family:Arial;
color:navy'><span style='mso-list:Ignore'>3)<font size=1 face="Times New Roman"><span
style='font:7.0pt "Times New Roman"'>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </span></font></span></span></font><![endif]><font
size=2 color=navy face=Arial><span style='font-size:10.0pt;font-family:Arial;
color:navy'>No final o script chamava outro .PL para enviar email, comecei a
ter erro no MIME Lite. Acabei baixando o Mime-Lite.zip (pelo que entendi é o
pacote do Mime-Lite) do site:</span></font> <font size=2 color=navy face=Arial><span
style='font-size:10.0pt;font-family:Arial;color:navy'><a
href="http://cpan.uwinnipeg.ca/PPMPackages/10xx/zips/">http://cpan.uwinnipeg.ca/PPMPackages/10xx/zips/</a>
- resolveu o problema e executou sem erros.<o:p></o:p></span></font></p>

<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p>&nbsp;</o:p></span></font></p>

<p class=MsoNormal style='margin-left:18.0pt'><font size=2 color=navy
face=Arial><span style='font-size:10.0pt;font-family:Arial;color:navy'>* ainda
acho que tenho de instalar o Pacote do CLASS::DATE do item 2, para ficar com a
instalação e pacotes configurados corretamente (mensagem do Solli abaixo).<o:p></o:p></span></font></p>

<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p>&nbsp;</o:p></span></font></p>

<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'>Valeu pelas dicas e pelo suporte de vocês.<o:p></o:p></span></font></p>

<p class=MsoNormal><font size=2 color=navy face=Arial><span style='font-size:
10.0pt;font-family:Arial;color:navy'><o:p>&nbsp;</o:p></span></font></p>

<div>

<p class=MsoNormal style='margin-left:18.0pt'><b><font size=2 color=navy
face="Comic Sans MS"><span style='font-size:10.0pt;font-family:"Comic Sans MS";
color:navy;font-weight:bold'>Hubert Thomaz Neto<o:p></o:p></span></font></b></p>

</div>

<div>

<div class=MsoNormal align=center style='text-align:center'><font size=3
face="Times New Roman"><span style='font-size:12.0pt'>

<hr size=2 width="100%" align=center tabindex=-1>

</span></font></div>

<p class=MsoNormal><b><font size=2 face=Tahoma><span style='font-size:10.0pt;
font-family:Tahoma;font-weight:bold'>De:</span></font></b><font size=2
face=Tahoma><span style='font-size:10.0pt;font-family:Tahoma'>
saopaulo-pm-bounces+hubert.thomaz=gvt.com.br@pm.org
[mailto:saopaulo-pm-bounces+hubert.thomaz=gvt.com.br@pm.org] <b><span
style='font-weight:bold'>Em nome de </span></b>Solli Honorio<br>
<b><span style='font-weight:bold'>Enviada em:</span></b> segunda-feira, 15 de
setembro de 2008 18:50<br>
<b><span style='font-weight:bold'>Para:</span></b> saopaulo-pm@mail.pm.org<br>
<b><span style='font-weight:bold'>Assunto:</span></b> Re: [SP-pm]RES: Ajuda
para utilização do Perl</span></font><o:p></o:p></p>

</div>

<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><o:p>&nbsp;</o:p></span></font></p>

<div>

<p class=MsoNormal style='margin-bottom:12.0pt'><font size=3 face="Courier New"><span
style='font-size:12.0pt;font-family:"Courier New"'>Hubert, como você instalou o
módulo ? Pois a mensagem está informando que não consegue achar o módulo em uma
das fontes de pesquisa dele para o Perl '*/site/lib' e o '*/lib'.<br>
<br>
Você tem certeza que existe o diretório
'D:/Aplicacao/Perl/site/lib/Class/Date'&nbsp; ou
'D:/Aplicacao/Perl/lib/Class/Date' ?<br>
<br>
Solli M. Honório<br>
<br>
</span></font><o:p></o:p></p>

<div>

<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'>2008/9/15 breno &lt;<a href="mailto:breno@rio.pm.org">breno@rio.pm.org</a>&gt;<o:p></o:p></span></font></p>

<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'>Hubert,<br>
<br>
repare que, segundo o seu exemplo, o @INC contém os diretórios:<br>
<br>
D:\Aplicacao\Perl\site\lib<br>
D:\Aplicacao\Perl\lib<br>
. &nbsp;(o diretório atual, no caso, &quot;D:\Scripts&quot;)<br>
<br>
e não contém o diretório onde a sua &quot;Class::Date&quot; (que, pela sua<br>
resposta, está em &quot;D:\Aplicacao\Perl\lib\HTTP\Class\Date.pm&quot;, certo?<br>
<br>
Experimente adicionar antes da linha que diz &quot;use Class::Date&quot; no seu<br>
programa &quot;D:\Scripts\consumo_corporate_sme.pl&quot; uma linha dizendo:<br>
<br>
use lib &quot;D:/Aplicacao/Perl/site/lib/HTTP&quot;;<o:p></o:p></span></font></p>

<div>

<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><br>
</span></font><font face="Courier New"><span style='font-family:"Courier New"'>Isto
que o Breno mostrou está dizendo para o Perl adicionar um outra 'diretório' de
pesquisa. Antes de fazer isto, confirme se o módulo realmente está instalado.
Faça um 'find' no explorer por Date.pm e vê se encontra alguma coisa e qual o
path ?.<br>
</span></font>&nbsp;<o:p></o:p></p>

</div>

<blockquote style='border:none;border-left:solid #CCCCCC 1.0pt;padding:0cm 0cm 0cm 6.0pt;
margin-left:4.8pt;margin-right:0cm'>

<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><br>
<br>
(atenção para a barra normal (/), e não invertida (\) )<br>
<br>
E me diga se funcionou. Ou experimente (via Windows Explorer mesmo)<br>
criar um diretório &quot;Class&quot; dentro de D:\Aplicacao\Perl\site\lib e<br>
mover/copiar o seu &quot;Date.pm&quot; para lá, de modo que o caminho para ele<br>
vire &quot;D:\Aplicacao\Perl\site\lib\Class\Date.pm&quot; e não&nbsp;<o:p></o:p></span></font></p>

</blockquote>

<blockquote style='border:none;border-left:solid #CCCCCC 1.0pt;padding:0cm 0cm 0cm 6.0pt;
margin-left:4.8pt;margin-right:0cm'>

<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'>&quot;D:\Aplicacao\Perl\site\lib\HTTP\Class\Date.pm&quot;.<o:p></o:p></span></font></p>

</blockquote>

<div>

<p class=MsoNormal style='margin-bottom:12.0pt'><font size=3
face="Times New Roman"><span style='font-size:12.0pt'><br>
</span></font><font face="Courier New"><span style='font-family:"Courier New"'>O
Class::Date precisa ser compilado, então cuidado em copiar, porque vai faltar
'DLL'. Se você não encontrar o Date.pm, recomendo que você instala via ppm.</span></font><o:p></o:p></p>

</div>

<blockquote style='border:none;border-left:solid #CCCCCC 1.0pt;padding:0cm 0cm 0cm 6.0pt;
margin-left:4.8pt;margin-right:0cm'>

<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><br>
Ou ainda (e esse passo é recomendado antes das duas opções<br>
anteriores), tente instalar novamente o Class::Date via ppm (supondo<br>
ActivePerl) ou cpan (supondo Strawberry Perl - a resposta à pergunta<br>
do Eden, digitando &quot;perl -V&quot; no prompt de comando, vai dizer mais<br>
detalhes sobre o seu &quot;perl&quot;).<br>
<br>
Se tiver qualquer dúvida envie um novo email, ok? E não deixe de nos<br>
avisar se tudo deu certo!<o:p></o:p></span></font></p>

<div>

<div>

<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><br>
[]s<br>
<br>
-b<br>
<br>
<br>
2008/9/15 Hubert Thomaz Neto &lt;<a href="mailto:hubert.thomaz@gvt.com.br">hubert.thomaz@gvt.com.br</a>&gt;:<br>
&gt;<br>
&gt; Breno e Solli,<br>
&gt; muito obrigado por prontamente estarem me auxiliando.<br>
&gt;<br>
&gt; Seguem respostas (Breno),<br>
&gt; &nbsp;1) D:\Aplicacao\Perl\lib\HTTP<br>
&gt; &nbsp;2) Anexo.<br>
&gt;<br>
&gt;<br>
&gt; Seguem respostas (Solli),<br>
&gt; &nbsp;1) e 2) ActivePerl-5.8.8.822-MSWin32-x86-280952.msi<br>
&gt;<br>
&gt;<br>
&gt; Sds,<br>
&gt; Hubert<br>
&gt;<br>
&gt;<br>
&gt;<br>
&gt;<br>
&gt; -----Mensagem original-----<br>
&gt; De: saopaulo-pm-bounces+hubert.thomaz=<a href="http://gvt.com.br"
target="_blank">gvt.com.br</a>@<a href="http://pm.org" target="_blank">pm.org</a>
[mailto:<a href="mailto:saopaulo-pm-bounces%2Bhubert.thomaz">saopaulo-pm-bounces+hubert.thomaz</a>=<a
href="http://gvt.com.br" target="_blank">gvt.com.br</a>@<a href="http://pm.org"
target="_blank">pm.org</a>] Em nome de breno<br>
&gt; Enviada em: segunda-feira, 15 de setembro de 2008 15:14<br>
&gt; Para: <a href="mailto:saopaulo-pm@mail.pm.org">saopaulo-pm@mail.pm.org</a><br>
&gt; Assunto: Re: [SP-pm] Ajuda para utilização do Perl<br>
&gt;<br>
&gt; Hubert, responda para a gente duas coisas:<br>
&gt;<br>
&gt; 1) Qual o caminho completo no seu sistema para o arquivo Class/Date.pm ?<br>
&gt;<br>
&gt; 2) O que vem logo após a mensagem de erro (justo a parte q vc apagou<br>
&gt; no email)? Em outras palavras: logo após a mensagem &quot;Can't locate<br>
&gt; Class/Date.pm in @INC &quot;, ele te diz o conteúdo do @INC, não diz? Deve<br>
&gt; se parecer com uma lista de diretórios. Se não tiver nada, experimente<br>
&gt; executar o seguinte programa (chame de teste-inc.pl, por exemplo):<br>
&gt;<br>
&gt; print join(', ', @INC) . &quot;\n&quot;;<br>
&gt;<br>
&gt; e cole no email o resultado, por favor.<br>
&gt;<br>
&gt; O motivo é que o perl procura pelos módulos (como &quot;Class::Date&quot;)<br>
&gt; dentro de diretórios específicos do seu sistema, armazenados na<br>
&gt; variável especial @INC. Se o módulo &quot;Class::Date&quot; está instalado<br>
&gt; (pergunta 1), então ele deve estar em um diretório não listado no @INC<br>
&gt; (pergunta 2).<br>
&gt;<br>
&gt; []s<br>
&gt;<br>
&gt; -b<br>
&gt;<br>
&gt; 2008/9/15 Hubert Thomaz Neto &lt;<a href="mailto:hubert.thomaz@gvt.com.br">hubert.thomaz@gvt.com.br</a>&gt;:<br>
&gt;&gt; Prezados,<br>
&gt;&gt;<br>
&gt;&gt; não sei se esta é a forma correta de obter ajuda/suporte sobre o Perl,
mas<br>
&gt;&gt; agradeço se puderem me auxiliar com a dificuldade que estou
enfrentando para<br>
&gt;&gt; executar um script Perl em um servidor Win2000 Server.<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt; Tenho um script que roda num Desktop e está executando perfeitamente.<br>
&gt;&gt; Instalamos o Perl <st1:PersonName ProductID="em um Servidor MS" w:st="on">em
 um Servidor MS</st1:PersonName> Win2000 Server no drive D:\PERL. Mudamos<br>
&gt;&gt; no script a linha que indica do drive C:\PERL para D:\PERL.<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt; Quando executa no entanto está indicando um erro: &quot; Can't locate<br>
&gt;&gt; Class/Date.pm in @INC ...&quot;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt; parece que não encontra a CLASS::<a href="http://DATE.PM"
target="_blank">DATE.PM</a>. A questão é que a biblioteca está<br>
&gt;&gt; na pasta embaixo de D:\PERL. Será que é necessário adicionar um PATH
na<br>
&gt;&gt; máquina para encontrar o arquivo?<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt; Li algo sobre instalar a Class-Date? Preciso fazer isso?<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt; Agradeço pelas dicas, ou sugestão onde posso encontrar a solução para
este<br>
&gt;&gt; problema.<br>
&gt;&gt;<br>
&gt;&gt; Grato,<br>
&gt;&gt;<br>
&gt;&gt; Hubert<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt; _______________________________________________<br>
&gt;&gt; SaoPaulo-pm mailing list<br>
&gt;&gt; <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
&gt;&gt; <a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm"
target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
&gt;&gt;<br>
&gt; _______________________________________________<br>
&gt; SaoPaulo-pm mailing list<br>
&gt; <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
&gt; <a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
&gt;<br>
&gt; _______________________________________________<br>
&gt; SaoPaulo-pm mailing list<br>
&gt; <a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
&gt; <a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
&gt;<br>
_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><o:p></o:p></span></font></p>

</div>

</div>

</blockquote>

</div>

<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><br>
<br clear=all>
<br>
-- <br>
&quot;o animal satisfeito dorme&quot;. - Guimarães Rosa<o:p></o:p></span></font></p>

</div>

</div>

</body>

</html>