Insecure dependency in eval message by dylanthomasfan- April 13, 2008 Hi,I am a Perl CGI beginner. I am trying to construct perl statements todo depending on user input, and interpret them at runtime using eval.I execute these commands by writingeval $commandString;where $commandString is constructed as per user input.if $commandString="simpleSubroutine();" my eval works well, but if$commandString="notSoSimpleSubroutine("$string1", "$string2");" myeval bombs with the following message:Insecure dependency in eval while...http://www.nntp.perl.org/group/perl.beginners.cgi/2008/04/msg13189.html Re: Sendmail by Gunnar Hjalmarsson- April 10, 2008 Mike Williams wrote:> On Thu, Apr 10, 2008 at 12:41 AM, Perl CGI script enhancer <> deepan.17gmail.com> wrote:> >> my $email = populateEmail("test");>> print $email;<snip>> Well, I didn&39;t see it at first, so I cut and pasted a snippet of your code> into a local file, ran it at the command line and got:> Undefined subroutine &main::populateEmail called at .cgi_list_bug.pl line 6<snip>This same question (without the missing...http://www.nntp.perl.org/group/perl.beginners.cgi/2008/04/msg13188.html Re: Testing an array for a match by John W. Krahn- April 10, 2008 Lou Hernsen wrote:> HalloHello,> I have an array> Treasures> and I want to match anywhere in it for> :1:2:3:> can I> if (Treasures = :1:2:3:)> or do i have to change (Treasures to $Treasures and then> $Treasures = Treasures ;> if ($Treasures = :1:2:3:)if ( grep :1:2:3:, Treasures ) John-- Perl isn&39;t a toolbox, but a small machine shop where youcan special-order certain sorts of tools at low cost andin short order. -- Larry Wallhttp://www.nntp.perl.org/group/perl.beginners.cgi/2008/04/msg13187.html Re: Sendmail by Mike Williams- April 10, 2008 On Thu, Apr 10, 2008 at 12:41 AM, Perl CGI script enhancer <deepan.17gmail.com> wrote:> my $email = populateEmail("test");> print $email;>> When i a using the above code it results in "No recipient address> found in header" and when i replace $email with "dpr.17gmail.com"> ie>> To : dpr.17gmail.com it works fine.>> populateEmail function&39;s code is available below:>> populateEmail > if(lc($_0) eq "test").http://www.nntp.perl.org/group/perl.beginners.cgi/2008/04/msg13186.html Sendmail by Perl CGI script enhancer- April 10, 2008 my $email = populateEmail("test");print $email;open(SENDMAIL, "usrlibsendmail -oi -t -i") or print "cannot openSENDMAIL: $!";print SENDMAIL <<"EOF";From: <deepanjuniper.net>To:$emailSubject: SUSTAINING TICKET CaseContent-type: texthtml testing..EOF close(SENDMAIL);When i a using the above code it results in "No recipient addressfound in header" and when i replace $email with "dpr.17gmail.com"ieTo : dpr.17gmail.com it works..http://www.nntp.perl.org/group/perl.beginners.cgi/2008/04/msg13185.html Testing an array for a match by Lou Hernsen- April 9, 2008 HalloI have an arrayTreasuresand I want to match anywhere in it for:1:2:3:can Iif (Treasures = :1:2:3:)or do i have to change (Treasures to $Treasures and then$Treasures = Treasures ;if ($Treasures = :1:2:3:)Just thought I&39;d ask first, I have to take mother in law to Dr. so I don&39;thave time to test right now...I&39;ll check email in a few hours...thanksLouhttp://www.nntp.perl.org/group/perl.beginners.cgi/2008/04/msg13184.html Re: Fwd: how to refresh between different pages of the same script by Jenda Krynicky- April 8, 2008 From: "Pau Marc Munoz Torres" <paumarc.munozbioinf.uab.cat>> ! usrbinperl> use strict;> use CGI::Ajax;> use CGI;> > my $q = new CGI;> > my $concatter = sub > > my $buffer = $ENV&39;QUERY_STRING&39;;> > my pairs = split( &, $buffer );> > foreach my $pair (pairs) > > my ( $name, $value ) = split( =, $pair );> > $name = tr+ ;> > $name =...http://www.nntp.perl.org/group/perl.beginners.cgi/2008/04/msg13183.html Re: Extracting TD's from a Text File (Regex Help). by Sean Davis- April 8, 2008 On Tue, Apr 8, 2008 at 8:22 AM, <sara.samsaragmail.com> wrote:> TEXT FILE > <td class="PhorumTableRowAlt thread" style="padding-left: 0px">>> <a href="http:mysite.comlinkhere_goesid=239">LINK<a>>> <span class="PhorumNewFlag"><span><td>>> <td class="PhorumTableRowAlt" nowrap="nowrap" width="150">> <a...http://www.nntp.perl.org/group/perl.beginners.cgi/2008/04/msg13182.html how to refresh between different pages of the same script by Pau Marc Munoz Torres- April 8, 2008 I have to modify a script to upload different data to a server,until now i did and script that ask you a question and capture the variableinto a hash (see below), now, i would like to modify it and make somethingthat allows me to ask different questions using the same scripthow can i do thisThanks! usrbinperluse strict;use CGI::Ajax;use CGI;my $q = new CGI;my $concatter = sub my $buffer = $ENV&39;QUERY_STRING&39;; my pairs = split( &, $buffer ); foreach my $pair (pairs) .http://www.nntp.perl.org/group/perl.beginners.cgi/2008/04/msg13181.html |