in reply to Re^2: Object Identifier? (red flags, more subs)
in thread Object Identifier?

Hi damfer21,

On first sight I don't see anything wrong with your modification. I just wonder if you also changed the file camp_copy_schedule_save.cgi? I mean, that is where the form action leads to. So I suspect you need to modify that file as well.

Veltro

  • Comment on Re^3: Object Identifier? (red flags, more subs)

Replies are listed 'Best First'.
Re^4: Object Identifier? (red flags, more subs)
by damfer21 (Novice) on Oct 22, 2018 at 18:07 UTC
    Hi Veltro- I will check that out. Thank you so much. I am really new at this. I am curious about how the script knows that $last120_flag means to include data from the last 120 days. Should there be a file that contains those definitions or are they somehow predefined in the actual script?
[reply]
      Please check variable $clast60 and your sql table named campaign. 

       $sql = "select status,curdate(),max_emails,last60_flag,aol_flag,open_
+flag,yahoo_flag,hour(schedule_time),minute(schedule_time),mid,redirec
+t_domain,campaign_nam +e from campaign where campaign_id=$campaign_id
+"; 

$sth = $dbh->prepare($sql); $sth->execute(); 

($status,$schedule_date,$max_emails,$clast60,$aolflag,$openflag,$yahoo
+_flag,$sho +ur,$smin,$old_mid,$old_dname,$cname) = $sth->fetchrow_arr
+ay();

      [download]

      I agree with the anonymous monk concerning red flags, this code has far too many flaws to justify anything else than a complete rewrite.

      Better don't tell us your website or it'll be hacked within 10 minutes.

      Cheers Rolf
      (addicted to the Perl Programming Language :)
      Wikisyntax for the Monastery FootballPerl is like chess, only without the dice

[reply]
[d/l]
        Thank you for the honesty. This was written a decade or so ago, and I had nothing to do with its creation. Just trying to modify it. Where do I find a list of variables?
[reply]

In Section Seekers of Perl Wisdom