nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

Can you use iw_perl inside java tags?

dlsoderberg

I have a page that has the following code hard coded into it:

<java>

HashMap hm = new HashMap(27);

hm.put("amazon","http://www.amazon.com/exec/obidos/redirect?tag=calphalon&path=tg/browse/-/291359");
hm.put("bedbathandbeyond","http://www.bedbathandbeyond.com/stylePage.asp?order_num=-1&RN=165");
hm.put("cooking","http://www.cooking.com/products/themepages/themefocus.asp?ThemeNo=0106");
hm.put("lnt","http://www.lnt.com/entry.point?target=152C6E&source=VL_LG:2506 Smiley Very Happy

GR:74:1:803:LNT");
hm.put("macys","http://www.macys.com/catalog/index.ognc?CategoryID=7611&LinkType=EverGreen");
hm.put("williams-sonoma","http://ww2.williams-sonoma.com/srch/name.cfm?imgs=1&src=catcckwb%7Cp1%7Crshop%2Fhme%2Fhme&rootcat=shop&nameform=1&words=calphalon");

//read in and randomize stores
String[] stores = {"amazon","bedbathandbeyond","cooking","lnt","macys","williams-sonoma"};
Vector storeVector = new Vector();
for( int i=0; i<stores.length; i++ ) {
storeVector.add( stores );
}
for( int i=0; storeVector.size()>0; i++ ) {
int random = (int) (Math.random() * storeVector.size());
stores = (String) storeVector.elementAt(random);
storeVector.remove( storeVector.elementAt(random) );
}
request.setParameter("hm",hm);
request.setParameter("stores",stores);
</java>

I'm looking to try and replace the values in the String[] stores={"a","b","c","d","e"} with the contents of a replicant area item from a DCR. My question is whether or not the <iw_perl> tags will work inside of the <java> tags or if I'm better off going with <iw_perl> tags only and printing out all of the lines for the <java> section as well.

Also, if you have any suggestion for this, please feel free to share them. My plan is to iterate through the replicant area, and set the value of a particular field into an array. Then once the iterations are complete, print out the text and the values from the array.

Thanks in advance for any help.

Find more posts tagged with

Comments

Dwayne

I'm not familiar with this <java> tag. I assume it's some app server functionality that you've got installed, correct?

Anyway, the PT shouldn't care about it. The templating compiler doesn't care about the tags that it doesn't recognize, and will ignore them.

The only caveat to that is that, by default, the entire PT has to be well-formed XML. That means, in essence, wrapping all of your java code inside of a big CDATA block.

The other choice is to make the <iw_pt> line be self-contained, closing the tag before any of your content even begins. The compiler will stop trying to validate the XML once the iw_pt tag closes, so you don't need to worry about CDATA.

So instead of


<iw_pt>
  some data
  <java>
    some java code
     <iw_perl>
      some perl
    <iw_perl>
  </java>
</iw_pt>

you would use


<iw_pt />
  some data
  <java>
    some java code
     <iw_perl>
      some perl
    <iw_perl>
  </java>

Current project: TS 5.5.2/6.1 W2K

Adam Stoller

Since the <java> tags are meant to be interpreted on the production side of things and the <iw_perl> tags are interpreted on the development side - I don't believe you will have any problems using iw_perl tags within java tags -- but do try to keep things properly nested.

--fish
Senior Consultant, Quotient Inc.
http://www.quotient-inc.com

dlsoderberg

Thanks for the repsonses DAB and fish!

Right now my problem seems to lie in this bit of code, do either of you see any glaring problems? Thanks again.

<iw_perl><![CDATA[
@array = ();
]]><iw_iterate var="big" list="dcr.Large Logo Area"><![CDATA[
$img = iwpt_dcr_value("big.Large Logo Image");
$img =~ s|^\w+://\w+\.(\w+).*$|$1|;
$str = '\"' . $img . '\"';
push @array, $str;
]]></iw_iterate><![CDATA[
//read in and randomize stores
$j1 = 'String[] stores = {';
$j2 = '};';
iwpt_output($j1);
iwpt_output(@array[0..$#array] Smiley Wink

;
iwpt_output($j2);
]]></iw_perl><![CDATA[

Dwayne

Sure do. While it's OK to use <iw_perl> inside your <java> tags, it is NOT OK to use <iw_iterate> inside your <iw_perl> tags. At least, I'm almost certain it's not OK.

There are probably ways to improve this, but, to keep the structure that you had in place, try this:


<iw_perl><![CDATA[
@array = ();
]]</iw_perl>
   <iw_iterate var="big" list="dcr.Large Logo Area"><iw_perl><![CDATA[
     $img = iwpt_dcr_value("big.Large Logo Image");
     $img =~ s|^\w+://\w+\.(\w+).*$|$1|;
     $str = '\"' . $img . '\"';
     push @array, $str; 
]]></iw_perl></iw_iterate><iw_perl><![CDATA[
   //read in and randomize stores
   $j1 = 'String[] stores = {';
   $j2 = '};';
   iwpt_output($j1);
   iwpt_output(@array[0..$#array];
   iwpt_output($j2);
]]></iw_perl><![CDATA[

Current project: TS 5.5.2/6.1 W2K

Adam Stoller

Or ...<iw_perl><![CDATA[
my @array = ();
foreach (iwpt_dcr_list("dcr.Large Logo Area")){
my $img = iwpt_dcr_value("$_.Large Logo Image");
$img =~ s|^\s+://\w+\.(\w+).*$|$1|;
push(@array, qq("$img"));
}
iwpt_output(join("\n",
"//read in and randomize stores",
"'String[] stores = {",
join(",\n", @array),
"};\n"));
]]></iw_perl>Note: You had a javascript comment (//read in and randomize stores) sitting out in the open, which I assumed you wanted output, and I also assume you wanted commas separating the elements of the array. I'm also not entirely sure your regex on $img does what you want, but I'll leave that to you to figure out.

--fish
Senior Consultant, Quotient Inc.
http://www.quotient-inc.com