Gossamer Forum
Home : General : Perl Programming :

Escape, but not escape?

Quote Reply
Escape, but not escape?
I'm trying to do something with a long winded string. I currently am assigning the variable to it with the following;

$image = qq|_]C_X 02D9)1@ ! 0 0 ! #_VP!# ! +# X,"A .#0X2$1 3&"@:&!86&#$C)1TH.C,]/#DS.#= 2%Q.0$17137!D>%QE9V/_VP!# 1$2$A@5&"\:&B]C0CA"8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V/_P 1" "U / # 2( A$! Q$!_\0 'P 04! 0$! 0$ $" P0%!@<("0H+_\0 M1 @$# P($ P4%! 0 %] 0(# 01!1(A,4$&$U%A!R)Q%#*!D:$((T*QP152T? D,V)R@@D*%A<8&1HE)B7J#A(6&AXB)BI*3E)66EYB9FJ*CI*6FIZBIJK*SM+6VM[BYNL+#Q,7&Q\C)RM+3U-76U]C9VN'BX^3EYN?HZ>KQ\O/T]?;W^/GZ_\0 'P$ P$! 0$! 0$! 0 $" P0%!@<("0H+_\0 M1$ @$"! 0#! +=LSZ#/'UJ*W+K=QJP"JV<$#/3M5B)FCA0RE00H!Q]*K32_OES(%9G&/I]*6D6FA;E]XL[=QR HX+O[3$67KG"@=^>M17;?N'6<;0S <'KSQD_E6DYJ70$B)'>"?]XZJQ/ YY/\ G%79)Y5&Y2,]@*HR2K).C.^"@YD8#;]!2J]Q+;-(%VEAD$$8//3/?US4KFC'38;5S+92J@"4L&ZEEI&C8,S>;&1CH.*E._Y=F_KSD#I0<,6RQW LX8](>1S!?R/*!NS#R/P!/?)KMO='-U+U_SK]HO]V*/]7/^%7=03=JEL<[?W;@,?7*UDP:A:W^JR786=/)6-"KJ ?E+'(Y[UJ3ZK9R+B4.@[5S@T[I7%9D=_<[3Y<1&>N<]*Q;J5V",2&++CH/4U8N1)),1%=V\JX!'[H@G]:KR121N$S 23CY%?K4:7N%F5+993*Y1';:.JKFEFCG$OF20.R$8;"X./ZU;M+E+=BL;K<7$I"B-00H/;)[]:KRWE].KI+#')\V#L/0@].M7?4-41?8/.C 1F7*Y$,RS>=+O4_?D0.1_*K_P#:\DT0#3Q3(IY_=&,_S/\ *K3MN1/WMC5L=L$VQ1\LG7(P+QDF,I1U(DW .I'&W'6L')QV-+7+,PXC'U'Y__JK>65955@HZ:NB:>\:-B&3<#]W';_\ 55>2[2V \R)W60X&UL[?=H'(& !SWZTRX@CLKF3RU86^TR DG@X.2/:HH;2=4A=8OWCJ"&W#IUZT[/J%C5LS&)?*A)&,,?E Y/TJ35$E< !U,'!,>TY.*>+-P5DBP'91F1CENG2F26TCJ?.N(]X'RDM@CUK51:5K$Z7,J2,BQ*E&"?=,@Z\\]*=9%+B PH&55.%&X'ODY%6%B@0M&+N,[AC!.,?TJY;06\3*8)(LG)RGS'U[5I!7>H,Q&+,4*@KSD@/UIP +MA'#8&?F_P#KU4!0[26C!X.,5-O4[@/*& .:YCJ)]-82ZXQ:(IM1L$]^15[4-3LTO0INHL@8(W9P?2K5K=1W!2% V^- 3D<<8%>;W3%[X!!G7S1;LN<@KOV]R!UQ4:L&=00N13DM2D]#50_ZO@=?Z&K7&P_2L$:OM 8VL^U3G.VG?\)"N/EM9&^I'-+E8[HVIH7='$8YE:0CZ&ITT.QA^9E! Z[B!_.LR;2-8FE/[V0H?[\U(OA:[;F2:(?B33^8C6\K2+?[TML#Z&0?TI/[3TB'@2Q_\ 0G^E4X_"JC_ %ET3[*G_P!>K4?ANR7[S2,?K_\ 6I:=QZA_;^GYPBROSCB, ?J:K#Q2CR&.WM&)SC<\@ _05H+I&G0HQ/\Z FE*IC1+7#?*0@!_E1=!9E"^U75()88HX("\PRH7+<4QO^$BG NVS;&#P,Y&34\T3JAW.01Z8IMQ%Y]QYK$IA0N <]*B25RXR:1A)^]U&9<@[78C\#2RHRN$+' &3QQ5^YM4MY(WBV@L26)ZD410&9L>4TJL,!\86D]0V%M%D:&,Y .6#=,>U=+HLT>V0&1YL?>.>*A:9F]*M*Q#8_3"B3R.XX5VQ[5KJJ3.&# ^E85D26F Z[B>I6ALJ,>;8Z=+1(\Y'2E6SLW/F-%'N(["H+6.ZGA$@D"C )PH')J6&"1W"R3,<^CX_E1J2VB9;2T4Y%NF?795B/R0@*A54C([5GS0?9M4M0"WS$]6)XQ4K(SQ1@ GY!CCVI.Z&K,L0Q6?FL88H-_5BJC-.NKZVL /,!!/.$3)JEIB[;N0$8(4UJ85EPPS2 S3K;/_P >]A=R9[E-H_.LNX\62J[(EH$93@AVS@UU X KC]9M@=8G>,!.06)7(.0#WJXI-DR;1%)XHU!_N>7'_NKG^=4IM:U&;[UU(/]TX_E5J&.T9R!'&S8). WI]:A1[8GY+L^2+>VE6)PT4GS$G.0?_U5HIJ=O;:)F&#+K&<,0.I[_P!:H3DS1@&!S@YV\=:>@J=ADNC3-9)(T;*^X '/KUXJZU_/(2Q/U- EJMNH#'M@U-AW+1?--W"H-]+OHL%SBOL3 P_*J)N0VZ&.XD]&(Q4"(Z/M92"#Z5.[%;@+C@J36G8+(V-KC'N,_UI2-(2<=BY97@2R6-8W9L8.$)J1?.+!DB8'U) JPL.T9DF('L !^N:8]U80_ZRZ4GT\SG\A17*FWR!UW'I^5&H:(=%;) Q91R1CKFIEZ5FFZG751:R% I4$$#GFI+G3II9BWVJXV'^%7V@?E2L%R\[I&I+NJC_ &CBN;UF\BGO6$*F4(NW*#=N/MBM2+1K96W-&K-_>?YC^M6&2&W7 7H"P ' Q_C5)),ELYJSTZ:57=+4Q,!\OF-C=FK4>BW;X\R>*+VBCR?S-;C2%#$HA.74D]]O3@_GBHKB\C2U(\^.&5ACYL@CUP.M425X-$2)@[2S,P&-Q?;Q^&*M0V%O"V]5);J#[U1?68(FD,<;RL[9R!M7'\ZB.MR/Z1CV%2[E+S-QGN <1[%3J689YJ 0PK+)*TCO))RY4D9JA#<^9\Q&QR.AK1TS:<<51D&Y2#^%2V,ZPMB0XI,J+-6QL+2>:[DN5#E)6 WG.!GM5V,6-N<8C0>RBLU[O28W:4R\ORRX)&>YIK>(;"$8A@D<^P"BJ3(:([>&YBU;[;%#E [8R<=>E;#2WTPPHC0=ADMC\!6#)XFFY\BUBC]V^8U4FUK4I^#_:[J4$C&68A>![59GUG3X"0UPK$=E^;^5<2_FRG,DC.?5CFF"W8GBIY;E)V.IG\3PK_J('?\ WC@5GS>(+V8C9#%'CHVW<1SGO]!6;&FW[W6K4<8(IJ*0F[B2WE]-DRW$DBGJN[ _+I2Q1ANE3)$!R*D2#/0X;U%%@$CB-6$@4CYE%$;%#ME7GU'2KBH,<:A!"86$:C(8C[V?\BDS:A&,I>_LC.M)5CU.">Y?[S;I/8&G/\ 8Y]0NGDD81F0F,@XR,GVJ]J&DM'J=LJ1JR2#DCD$Y[TVPTEY+VZ22) J'@N.,9-*SV/4=>GR\]VG;I;O_7R*BK;W=Z8BS>6JA8@IQ_3ZFKFBJ&OIX()&:$)N&3GD8_\ KU+I^F,NL7,M.WMH-/\ ,>,QEW& J#@4U$YZ^(C9Q5W=+M_5SA4P8UX["GKR,T459YPI.!FDSD9HHH$(3QFJ\IP:**8B$C)YHV"BBF Y4&*ECC!HHH F$:TY(QNHHH D\M2>E B"MP:**8BU$N .:L1J,\<<444@) H.0>:BD8P%=I)!Y&3THHJ&,NQON7=C%*'/-%%,"1#N7.,4\445("FG+D&BBD,=GBKC7@VAA$!*%QOS_2BBG|;

The problem is, that " | and other charachters like that are taken literally. Is there anything I can surround the variable so that it doesn't take stuff within it literally? Basically, a similar thing like \Q in Regex. I've tried;

$var = '';
$var = "";
$var = qq||;;
$var = qq~~;
...etc

Any suggestions?

Cheers

Andy (mod)
andy@ultranerds.co.uk


IMPORTANT: I've now moved to ultranerds.co.uk, and the .com will no longer work!
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package (plugins total "value" $3,325 & rising, for just $350)| GLinks ULTRA Package PRO (plugins total "value" $5,625 & rising, for just $500)
Support Forum | Links SQL Plugins | DMOZ Dumps | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
Compare our different Plugin packages *new* Free CSS Templates
Quote Reply
Re: [Andy] Escape, but not escape? In reply to
As you are using qq| then surely the only thing you'd need to escape is |'s within the string.

With a quick look I can't see any curly braces, so try:

qq{ ... }

If you escape it, it may screw up the encoded code.
Quote Reply
Re: [Paul] Escape, but not escape? In reply to
Yeah, thats what I was thinking (didn't try {} though), either way, its still giving me an error Frown

Quote:
Software error:
syntax error at a.cgi line 21, near "9D"
Execution of a.cgi aborted due to compilation errors.

Its this bit;

%9D=

Is it the % thats causing the problem? I wouldn't have thought it would be, cos you can use % in qq| etc Unsure

Cheers

Andy (mod)
andy@ultranerds.co.uk


IMPORTANT: I've now moved to ultranerds.co.uk, and the .com will no longer work!
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package (plugins total "value" $3,325 & rising, for just $350)| GLinks ULTRA Package PRO (plugins total "value" $5,625 & rising, for just $500)
Support Forum | Links SQL Plugins | DMOZ Dumps | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
Compare our different Plugin packages *new* Free CSS Templates
Quote Reply
Re: [Andy] Escape, but not escape? In reply to
Howz about...

my ($image) = <<'END_OF_IMG';

...

END_OF_IMG
Quote Reply
Re: [Paul] Escape, but not escape? In reply to
Still producing the same error. I just can't work out why its spewing up errors Frown

Cheers

Andy (mod)
andy@ultranerds.co.uk


IMPORTANT: I've now moved to ultranerds.co.uk, and the .com will no longer work!
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package (plugins total "value" $3,325 & rising, for just $350)| GLinks ULTRA Package PRO (plugins total "value" $5,625 & rising, for just $500)
Support Forum | Links SQL Plugins | DMOZ Dumps | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
Compare our different Plugin packages *new* Free CSS Templates
Quote Reply
Re: [Andy] Escape, but not escape? In reply to
What's the error?

Can a string be that long?

- wil
Quote Reply
Re: [Andy] Escape, but not escape? In reply to
I just tested it out and it works fine for me.

http://213.106.15.160/cgi-bin/test.cgi
Quote Reply
Re: [Paul] Escape, but not escape? In reply to
Quote:
As you are using qq| then surely the only thing you'd need to escape is |'s within the string.

And $'s. =)

Cheers,

Alex
--
Gossamer Threads Inc.
Quote Reply
Re: [Alex] Escape, but not escape? In reply to
...and @'s Wink
Quote Reply
Re: [Paul] Escape, but not escape? In reply to
Weird. Won't work for me.

#!/usr/bin/perl

use CGI::Carp qw(fatalsToBrowser);
print $IN->header();

my ($image) = <<<END_OF_IMG
C_X 02D9)1@ ! 0 0 ! #_VP!# ! +# X,"A .#0X2$1 3&"@:&!86&#$C)1TH.C,]/#DS.#= 2%Q.0$17137!D>%QE9V/_VP!# 1$2$A@5&"\:&B]C0CA"8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V/_P 1" "U / # 2( A$! Q$!_\0 'P 04! 0$! 0$ $" P0%!@<("0H+_\0 M1 @$# P($ P4%! 0 %] 0(# 01!1(A,4$&$U%A!R)Q%#*!D:$((T*QP152T? D,V)R@@D*%A<8&1HE)B7J#A(6&AXB)BI*3E)66EYB9FJ*CI*6FIZBIJK*SM+6VM[BYNL+#Q,7&Q\C)RM+3U-76U]C9VN'BX^3EYN?HZ>KQ\O/T]?;W^/GZ_\0 'P$ P$! 0$! 0$! 0 $" P0%!@<("0H+_\0 M1$ @$"! 0#! +=LSZ#/'UJ*W+K=QJP"JV<$#/3M5B)FCA0RE00H!Q]*K32_OES(%9G&/I]*6D6FA;E]XL[=QR HX+O[3$67KG"@=^>M17;?N'6<;0S <'KSQD_E6DYJ70$B)'>"?]XZJQ/ YY/\ G%79)Y5&Y2,]@*HR2K).C.^"@YD8#;]!2J]Q+;-(%VEAD$$8//3/?US4KFC'38;5S+92J@"4L&ZEEI&C8,S>;&1CH.*E._Y=F_KSD#I0<,6RQW LX8](>1S!?R/*!NS#R/P!/?)KMO='-U+U_SK]HO]V*/]7/^%7=03=JEL<[?W;@,?7*UDP:A:W^JR786=/)6-"KJ ?E+'(Y[UJ3ZK9R+B4.@[5S@T[I7%9D=_<[3Y<1&>N<]*Q;J5V",2&++CH/4U8N1)),1%=V\JX!'[H@G]:KR121N$S 23CY%?K4:7N%F5+993*Y1';:.JKFEFCG$OF20.R$8;"X./ZU;M+E+=BL;K<7$I"B-00H/;)[]:KRWE].KI+#')\V#L/0@].M7?4-41?8/.C 1F7*Y$,RS>=+O4_?D0.1_*K_P#:\DT0#3Q3(IY_=&,_S/\ *K3MN1/WMC5L=L$VQ1\LG7(P+QDF,I1U(DW .I'&W'6L')QV-+7+,PXC'U'Y__JK>65955@HZ:NB:>\:-B&3<#]W';_\ 55>2[2V \R)W60X&UL[?=H'(& !SWZTRX@CLKF3RU86^TR DG@X.2/:HH;2=4A=8OWCJ"&W#IUZT[/J%C5LS&)?*A)&,,?E Y/TJ35$E< !U,'!,>TY.*>+-P5DBP'91F1CENG2F26TCJ?.N(]X'RDM@CUK51:5K$Z7,J2,BQ*E&"?=,@Z\\]*=9%+B PH&55.%&X'ODY%6%B@0M&+N,[AC!.,?TJY;06\3*8)(LG)RGS'U[5I!7>H,Q&+,4*@KSD@/UIP +MA'#8&?F_P#KU4!0[26C!X.,5-O4[@/*& .:YCJ)]-82ZXQ:(IM1L$]^15[4-3LTO0INHL@8(W9P?2K5K=1W!2% V^- 3D<<8%>;W3%[X!!G7S1;LN<@KOV]R!UQ4:L&=00N13DM2D]#50_ZO@=?Z&K7&P_2L$:OM 8VL^U3G.VG?\)"N/EM9&^I'-+E8[HVIH7='$8YE:0CZ&ITT.QA^9E! Z[B!_.LR;2-8FE/[V0H?[\U(OA:[;F2:(?B33^8C6\K2+?[TML#Z&0?TI/[3TB'@2Q_\ 0G^E4X_"JC_ %ET3[*G_P!>K4?ANR7[S2,?K_\ 6I:=QZA_;^GYPBROSCB, ?J:K#Q2CR&.WM&)SC<\@ _05H+I&G0HQ/\Z FE*IC1+7#?*0@!_E1=!9E"^U75()88HX("\PRH7+<4QO^$BG NVS;&#P,Y&34\T3JAW.01Z8IMQ%Y]QYK$IA0N <]*B25RXR:1A)^]U&9<@[78C\#2RHRN$+' &3QQ5^YM4MY(WBV@L26)ZD410&9L>4TJL,!\86D]0V%M%D:&,Y .6#=,>U=+HLT>V0&1YL?>.>*A:9F]*M*Q#8_3"B3R.XX5VQ[5KJJ3.&# ^E85D26F Z[B>I6ALJ,>;8Z=+1(\Y'2E6SLW/F-%'N(["H+6.ZGA$@D"C )PH')J6&"1W"R3,<^CX_E1J2VB9;2T4Y%NF?795B/R0@*A54C([5GS0?9M4M0"WS$]6)XQ4K(SQ1@ GY!CCVI.Z&K,L0Q6?FL88H-_5BJC-.NKZVL /,!!/.$3)JEIB[;N0$8(4UJ85EPPS2 S3K;/_P >]A=R9[E-H_.LNX\62J[(EH$93@AVS@UU X KC]9M@=8G>,!.06)7(.0#WJXI-DR;1%)XHU!_N>7'_NKG^=4IM:U&;[UU(/]TX_E5J&.T9R!'&S8). WI]:A1[8GY+L^2+>VE6)PT4GS$G.0?_U5HIJ=O;:)F&#+K&<,0.I[_P!:H3DS1@&!S@YV\=:>@J=ADNC3-9)(T;*^X '/KUXJZU_/(2Q/U- EJMNH#'M@U-AW+1?--W"H-]+OHL%SBOL3 P_*J)N0VZ&.XD]&(Q4"(Z/M92"#Z5.[%;@+C@J36G8+(V-KC'N,_UI2-(2<=BY97@2R6-8W9L8.$)J1?.+!DB8'U) JPL.T9DF('L !^N:8]U80_ZRZ4GT\SG\A17*FWR!UW'I^5&H:(=%;) Q91R1CKFIEZ5FFZG751:R% I4$$#GFI+G3II9BWVJXV'^%7V@?E2L%R\[I&I+NJC_ &CBN;UF\BGO6$*F4(NW*#=N/MBM2+1K96W-&K-_>?YC^M6&2&W7 7H"P ' Q_C5)),ELYJSTZ:57=+4Q,!\OF-C=FK4>BW;X\R>*+VBCR?S-;C2%#$HA.74D]]O3@_GBHKB\C2U(\^.&5ACYL@CUP.M425X-$2)@[2S,P&-Q?;Q^&*M0V%O"V]5);J#[U1?68(FD,<;RL[9R!M7'\ZB.MR/Z1CV%2[E+S-QGN <1[%3J689YJ 0PK+)*TCO))RY4D9JA#<^9\Q&QR.AK1TS:<<51D&Y2#^%2V,ZPMB0XI,J+-6QL+2>:[DN5#E)6 WG.!GM5V,6-N<8C0>RBLU[O28W:4R\ORRX)&>YIK>(;"$8A@D<^P"BJ3(:([>&YBU;[;%#E [8R<=>E;#2WTPPHC0=ADMC\!6#)XFFY\BUBC]V^8U4FUK4I^#_:[J4$C&68A>![59GUG3X"0UPK$=E^;^5<2_FRG,DC.?5CFF"W8GBIY;E)V.IG\3PK_J('?\ WC@5GS>(+V8C9#%'CHVW<1SGO]!6;&FW[W6K4<8(IJ*0F[B2WE]-DRW$DBGJN[ _+I2Q1ANE3)$!R*D2#/0X;U%%@$CB-6$@4CYE%$;%#ME7GU'2KBH,<:A!"86$:C(8C[V?\BDS:A&,I>_LC.M)5CU.">Y?[S;I/8&G/\ 8Y]0NGDD81F0F,@XR,GVJ]J&DM'J=LJ1JR2#DCD$Y[TVPTEY+VZ22) J'@N.,9-*SV/4=>GR\]VG;I;O_7R*BK;W=Z8BS>6JA8@IQ_3ZFKFBJ&OIX()&:$)N&3GD8_\ KU+I^F,NL7,M.WMH-/\ ,>,QEW& J#@4U$YZ^(C9Q5W=+M_5SA4P8UX["GKR,T459YPI.!FDSD9HHH$(3QFJ\IP:**8B$C)YHV"BBF Y4&*ECC!HHH F$:TY(QNHHH D\M2>E B"MP:**8BU$N .:L1J,\<<444@) H.0>:BD8P%=I)!Y&3THHJ&,NQON7=C%*'/-%%,"1#N7.,4\445("FG+D&BBD,=GBKC7@VAA$!*%QOS_2BBG
END_OF_IMG;

binmode IMAGE;
$_ = $image;
tr#A-Za-z0-9+/##cd;
tr#A-Za-z0-9+/# -_#;
print IMAGE unpack('u*', chr(32 + int(length($_)*3/4)) . $_);

Unsure

What did you use? I'm still getting the error;

Quote:
Software error:
syntax error at a.cgi line 6, near "9D"
Execution of a.cgi aborted due to compilation errors.

Cheers

Andy (mod)
andy@ultranerds.co.uk


IMPORTANT: I've now moved to ultranerds.co.uk, and the .com will no longer work!
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package (plugins total "value" $3,325 & rising, for just $350)| GLinks ULTRA Package PRO (plugins total "value" $5,625 & rising, for just $500)
Support Forum | Links SQL Plugins | DMOZ Dumps | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
Compare our different Plugin packages *new* Free CSS Templates
Quote Reply
Re: [Andy] Escape, but not escape? In reply to
Code:
#!/perl/bin/perl

my $string = <<'CODE';
C_X 02D9)1@ ! 0 0 ! #_VP!# ! +# X,"A .#0X2$1 3&"@:&!86&#$C)1TH.C,]/#DS.#= 2%Q.0$17137!D>%QE9V/_VP!# 1$2$A@5&"\:&B]C0CA"8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V-C8V/_P 1" "U / # 2( A$! Q$!_\0 'P 04! 0$! 0$ $" P0%!@<("0H+_\0 M1 @$# P($ P4%! 0 %] 0(# 01!1(A,4$&$U%A!R)Q%#*!D:$((T*QP152T? D,V)R@@D*%A<8&1HE)B7J#A(6&AXB)BI*3E)66EYB9FJ*CI*6FIZBIJK*SM+6VM[BYNL+#Q,7&Q\C)RM+3U-76U]C9VN'BX^3EYN?HZ>KQ\O/T]?;W^/GZ_\0 'P$ P$! 0$! 0$! 0 $" P0%!@<("0H+_\0 M1$ @$"! 0#! +=LSZ#/'UJ*W+K=QJP"JV<$#/3M5B)FCA0RE00H!Q]*K32_OES(%9G&/I]*6D6FA;E]XL[=QR HX+O[3$67KG"@=^>M17;?N'6<;0S <'KSQD_E6DYJ70$B)'>"?]XZJQ/ YY/\ G%79)Y5&Y2,]@*HR2K).C.^"@YD8#;]!2J]Q+;-(%VEAD$$8//3/?US4KFC'38;5S+92J@"4L&ZEEI&C8,S>;&1CH.*E._Y=F_KSD#I0<,6RQW LX8](>1S!?R/*!NS#R/P!/?)KMO='-U+U_SK]HO]V*/]7/^%7=03=JEL<[?W;@,?7*UDP:A:W^JR786=/)6-"KJ ?E+'(Y[UJ3ZK9R+B4.@[5S@T[I7%9D=_<[3Y<1&>N<]*Q;J5V",2&++CH/4U8N1)),1%=V\JX!'[H@G]:KR121N$S 23CY%?K4:7N%F5+993*Y1';:.JKFEFCG$OF20.R$8;"X./ZU;M+E+=BL;K<7$I"B-00H/;)[]:KRWE].KI+#')\V#L/0@].M7?4-41?8/.C 1F7*Y$,RS>=+O4_?D0.1_*K_P#:\DT0#3Q3(IY_=&,_S/\ *K3MN1/WMC5L=L$VQ1\LG7(P+QDF,I1U(DW .I'&W'6L')QV-+7+,PXC'U'Y__JK>65955@HZ:NB:>\:-B&3<#]W';_\ 55>2[2V \R)W60X&UL[?=H'(& !SWZTRX@CLKF3RU86^TR DG@X.2/:HH;2=4A=8OWCJ"&W#IUZT[/J%C5LS&)?*A)&,,?E Y/TJ35$E< !U,'!,>TY.*>+-P5DBP'91F1CENG2F26TCJ?.N(]X'RDM@CUK51:5K$Z7,J2,BQ*E&"?=,@Z\\]*=9%+B PH&55.%&X'ODY%6%B@0M&+N,[AC!.,?TJY;06\3*8)(LG)RGS'U[5I!7>H,Q&+,4*@KSD@/UIP +MA'#8&?F_P#KU4!0[26C!X.,5-O4[@/*& .:YCJ)]-82ZXQ:(IM1L$]^15[4-3LTO0INHL@8(W9P?2K5K=1W!2% V^- 3D<<8%>;W3%[X!!G7S1;LN<@KOV]R!UQ4:L&=00N13DM2D]#50_ZO@=?Z&K7&P_2L$:OM 8VL^U3G.VG?\)"N/EM9&^I'-+E8[HVIH7='$8YE:0CZ&ITT.QA^9E! Z[B!_.LR;2-8FE/[V0H?[\U(OA:[;F2:(?B33^8C6\K2+?[TML#Z&0?TI/[3TB'@2Q_\ 0G^E4X_"JC_ %ET3[*G_P!>K4?ANR7[S2,?K_\ 6I:=QZA_;^GYPBROSCB, ?J:K#Q2CR&.WM&)SC<\@ _05H+I&G0HQ/\Z FE*IC1+7#?*0@!_E1=!9E"^U75()88HX("\PRH7+<4QO^$BG NVS;&#P,Y&34\T3JAW.01Z8IMQ%Y]QYK$IA0N <]*B25RXR:1A)^]U&9<@[78C\#2RHRN$+' &3QQ5^YM4MY(WBV@L26)ZD410&9L>4TJL,!\86D]0V%M%D:&,Y .6#=,>U=+HLT>V0&1YL?>.>*A:9F]*M*Q#8_3"B3R.XX5VQ[5KJJ3.&# ^E85D26F Z[B>I6ALJ,>;8Z=+1(\Y'2E6SLW/F-%'N(["H+6.ZGA$@D"C )PH')J6&"1W"R3,<^CX_E1J2VB9;2T4Y%NF?795B/R0@*A54C([5GS0?9M4M0"WS$]6)XQ4K(SQ1@ GY!CCVI.Z&K,L0Q6?FL88H-_5BJC-.NKZVL /,!!/.$3)JEIB[;N0$8(4UJ85EPPS2 S3K;/_P >]A=R9[E-H_.LNX\62J[(EH$93@AVS@UU X KC]9M@=8G>,!.06)7(.0#WJXI-DR;1%)XHU!_N>7'_NKG^=4IM:U&;[UU(/]TX_E5J&.T9R!'&S8). WI]:A1[8GY+L^2+>VE6)PT4GS$G.0?_U5HIJ=O;:)F&#+K&<,0.I[_P!:H3DS1@&!S@YV\=:>@J=ADNC3-9)(T;*^X '/KUXJZU_/(2Q/U- EJMNH#'M@U-AW+1?--W"H-]+OHL%SBOL3 P_*J)N0VZ&.XD]&(Q4"(Z/M92"#Z5.[%;@+C@J36G8+(V-KC'N,_UI2-(2<=BY97@2R6-8W9L8.$)J1?.+!DB8'U) JPL.T9DF('L !^N:8]U80_ZRZ4GT\SG\A17*FWR!UW'I^5&H:(=%;) Q91R1CKFIEZ5FFZG751:R% I4$$#GFI+G3II9BWVJXV'^%7V@?E2L%R\[I&I+NJC_ &CBN;UF\BGO6$*F4(NW*#=N/MBM2+1K96W-&K-_>?YC^M6&2&W7 7H"P ' Q_C5)),ELYJSTZ:57=+4Q,!\OF-C=FK4>BW;X\R>*+VBCR?S-;C2%#$HA.74D]]O3@_GBHKB\C2U(\^.&5ACYL@CUP.M425X-$2)@[2S,P&-Q?;Q^&*M0V%O"V]5);J#[U1?68(FD,<;RL[9R!M7'\ZB.MR/Z1CV%2[E+S-QGN <1[%3J689YJ 0PK+)*TCO))RY4D9JA#<^9\Q&QR.AK1TS:<<51D&Y2#^%2V,ZPMB0XI,J+-6QL+2>:[DN5#E)6 WG.!GM5V,6-N<8C0>RBLU[O28W:4R\ORRX)&>YIK>(;"$8A@D<^P"BJ3(:([>&YBU;[;%#E [8R<=>E;#2WTPPHC0=ADMC\!6#)XFFY\BUBC]V^8U4FUK4I^#_:[J4$C&68A>![59GUG3X"0UPK$=E^;^5<2_FRG,DC.?5CFF"W8GBIY;E)V.IG\3PK_J('?\ WC@5GS>(+V8C9#%'CHVW<1SGO]!6;&FW[W6K4<8(IJ*0F[B2WE]-DRW$DBGJN[ _+I2Q1ANE3)$!R*D2#/0X;U%%@$CB-6$@4CYE%$;%#ME7GU'2KBH,<:A!"86$:C(8C[V?\BDS:A&,I>_LC.M)5CU.">Y?[S;I/8&G/\ 8Y]0NGDD81F0F,@XR,GVJ]J&DM'J=LJ1JR2#DCD$Y[TVPTEY+VZ22) J'@N.,9-*SV/4=>GR\]VG;I;O_7R*BK;W=Z8BS>6JA8@IQ_3ZFKFBJ&OIX()&:$)N&3GD8_\ KU+I^F,NL7,M.WMH-/\ ,>,QEW& J#@4U$YZ^(C9Q5W=+M_5SA4P8UX["GKR,T459YPI.!FDSD9HHH$(3QFJ\IP:**8B$C)YHV"BBF Y4&*ECC!HHH F$:TY(QNHHH D\M2>E B"MP:**8BU$N .:L1J,\<<444@) H.0>:BD8P%=I)!Y&3THHJ&,NQON7=C%*'/-%%,"1#N7.,4\445("FG+D&BBD,=GBKC7@VAA$!*%QOS_2BBG
CODE

print "Content-type: text/html\n\n";
print $string;
Quote Reply
Re: [Andy] Escape, but not escape? In reply to
You forgot the single quotes around END_OF_IMG.

Cheers,

Alex
--
Gossamer Threads Inc.
Quote Reply
Re: [Alex] Escape, but not escape? In reply to
...and also the semi-colon. Also the semi-colon *after* END_OF_IMG needs removing.
Quote Reply
Re: [Alex] Escape, but not escape? In reply to
There were also three <'s intead of two Wink
Quote Reply
Re: [Paul] Escape, but not escape? In reply to
Ok...I'm lost. In your code, you use;

my ($var) = <<'NAME';
stuff for this variable
NAME

.,..and yours works. I don't really use this way of showing stuff in perl (or assigning) strings. In PHP its very similar, so maybe I'm just getting confused Unsure

$var = <<<VAR_NAME
all the stuff for the var here
VAR_NAME;

So what is the correct format? Unsure

Cheers

Andy (mod)
andy@ultranerds.co.uk


IMPORTANT: I've now moved to ultranerds.co.uk, and the .com will no longer work!
Want to give me something back for my help? Please see my Amazon Wish List
GLinks ULTRA Package (plugins total "value" $3,325 & rising, for just $350)| GLinks ULTRA Package PRO (plugins total "value" $5,625 & rising, for just $500)
Support Forum | Links SQL Plugins | DMOZ Dumps | UltraNerds | ULTRAGLobals Plugin | Pre-Made Template Sets | FREE GLinks Plugins!
Compare our different Plugin packages *new* Free CSS Templates
Quote Reply
Re: [Andy] Escape, but not escape? In reply to
Mine Tongue