Help with simple IF Then statement

iwcnb

I am having a problem writing a simple IF THEN statement that compares a date in the text field to Today's date. I tried using a variable to assign Today's date after the equal operation, but it seems like I am not allow to do that. Here is my script:

<iw_perl><![CDATA[
sub DateTime{
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
my $date = sprintf("%2.2d/%2.2d/%4.4d ",$mon+1,$mday,$year+1900);
}
]]></iw_perl>

<iw_if expn='{iw_value name="Headline.Date"/} eq "$date" '>
<iw_then>
<![CDATA[<img src="/images/NewToday.gif" width="1" height="1" border="0" alt="">]]>
</iw_then>
</iw_if>

Is what I am doing correct or I missed something here.
Greatly appreciate if someone can show me a work around.

Thanks!

Migrateduser

I think there may be a couple of problems here? $date is only being populated inside the subroutine - so it should be local to that sub and not visible outside? And the sub is never being called? Plus don't you want dcr.Headline.Date (I am not sure).

<iw_perl><![CDATA[

sub DateTime
{
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
return( sprintf("%2.2d/%2.2d/%4.4d ",$mon+1,$mday,$year+1900));
}

my ${date} = DateTime();

...

<iw_if expn='{iw_value name="dcr.Headline.Date" /} eq {iw_value name="${date}" /}'>