[ic] comparing dates and numbers

[interchange-users@lists.akopia.com]

I'm trying to compare a date in the userdb with todays day to determine if 
membership has expired. Here is the code, it always returns 0. I've been 
working on this all day with no luck, any help would be appreciated,  Thanks.

[seti check_expired]
    [perl]
        my $today_date = [tag time]%Y%m%d[/tag];
        my $club_date = [value club_current];
        if ($today_date - $club_date > 0) {
            return 1;
        } else {
            return;
        }
    [/perl]
[/seti]

Tim Watts