[Fwd: [ic] Scripting inside IC Tags]

Barry Treahy, Jr. interchange-users@icdevgroup.org
Thu Sep 19 20:58:01 2002


Frank wrote:

>"Barry Treahy, Jr." wrote:
>  
>
>ThanX for your help, I think I got it now:
>
>       [loop search="se=[perl interpolate=1]
>				$tmp = localtime;
>				$txt = 'a';
>				if ($tmp  =~ /0 2002$/) {$txt = 'a'}
>				if ($tmp  =~ /1 2002$/) {$txt = 'b'}
>				if ($tmp  =~ /2 2002$/) {$txt = 'c'}
>				if ($tmp  =~ /3 2002$/) {$txt = 'd'}
>				if ($tmp  =~ /4 2002$/) {$txt = 'e'}
>				if ($tmp  =~ /5 2002$/) {$txt = 'f'}
>				if ($tmp  =~ /6 2002$/) {$txt = 'g'}
>				if ($tmp  =~ /7 2002$/) {$txt = 'h'}
>				if ($tmp  =~ /8 2002$/) {$txt = 'i'}
>				if ($tmp  =~ /9 2002$/) {$txt = 'j'}
>				$out = $txt;
>				$out;
>			[/perl]/sf=cat/ml=1"]
>  
>   not very elegant - but it works!
>  
>
Hi Frank,

but do you want to have to edit this next year, 2003?

Barry

-- 

Barry Treahy, Jr  *  Midwest Microwave  *  Vice President & CIO 

E-mail: Treahy@mmaz.com * Phone: 480/314-1320 * FAX: 480/661-7028