[ic] How to Call a GlobalSub?

Sam Hui shui@lunamedium.com
Tue, 27 Feb 2001 08:58:40 -0800


This is a multi-part message in MIME format.

------=_NextPart_000_0012_01C0A09B.716D56E0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

Hey Dave and Mike,

I just tried the same exact code on another server, also RedHat 6.2,
Interchange 4.6.3 RPM, Perl 5.00503 and it just works.  I'll try to
narrow it down and hopefully figure out what's going on.

-Sam

-----Original Message-----
Message: 7
Date: Tue, 27 Feb 2001 10:29:53 +0000
To: interchange-users@lists.akopia.com
From: Dave Barr <dave.barr@cricinfo.com>
Subject: Re: [ic] How to Call a GlobalSub?
Reply-To: interchange-users@lists.akopia.com

Hi Sam & Mike,

Likewise I have been having problems with the GlobalSubs, I attempted
what Mike suggested:

==snip===============
[perl subs=1]
test_global_sub()
[/perl]
==/snip==============

Using: IC 4.6.3 (tarball), Debian 2.2.17, Perl 5.005-03

And here is the results from from the catalog and Interchange error logs
(absolutely identical):

==snip===============
192.168.0.126 JXisUioQ:192.168.0.126 - [27/February/2001:10:03:16 +0000]
cishop /exec/cishop/test Safe: Unable to create sub named
"*MVSAFE::test_global_sub" at (eval 255) line 2.
==/snip==============

Hope that doesn't make the problem more convoluted?  ;-)

Rgds
Dave
---------------------------------------------


>Thanks Mike,
>
>Just tried your suggestion:
>
>[perl subs=1]
>test_global_sub()
>[/perl]
>
>and here is what I get in the error log:
>
>192.168.0.84 e3JGkEeq:192.168.0.84 - [26/February/2001:18:58:22 -0800]
>store3 /cgi-bin/store3/test.html Runtime error: Unable to create sub
named
>"" at //usr/lib/interchange/lib/Vend/Interpolate.pm line 1656.
>>
>
>Why is it trying to create a sub when it is presumably already
declared?
>I'm running Interchange 4.6.3 under Red Hat 6.2.
>
>-Sam
>
>-----Original Message-----
>Date: Mon, 26 Feb 2001 21:49:01 -0500
>From: Mike Heins <mikeh@minivend.com>
>To: interchange-users@lists.akopia.com
>Subject: Re: [ic] How to Call a GlobalSub?
>Reply-To: mike@minivend.com
>Reply-To: interchange-users@lists.akopia.com
>
>Quoting Sam Hui (shui@lunamedium.com):
>>  Hi,
>>
>>  I'm having a bit of trouble calling a GlobalSub, even the one
included,
>ie.
>>  test_global_sub which is declared like this in the interchange.cfg:
>>
>>  Variable   DEBUG     1
>>  #ifdef @DEBUG
>>  GlobalSub sub test_global_sub { return "Test of global subroutine
OK."; }
>>  #endif
>>
>>  Then in a test.html file:
>>
>>  <html>
>>  hello!
>>  [perl arg=sub interpolate=1]
>>  test_global_sub()
>>  [/perl]
>>  goodbye!
>>  </html>
>
>Make it:
>
>  [perl subs=1]
>  test_global_sub()
>  [/perl]
>
>You almost never want interpolate=1 in a perl tag, either, nowadays.
>

------=_NextPart_000_0012_01C0A09B.716D56E0
Content-Type: application/x-pkcs7-signature;
	name="smime.p7s"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
	filename="smime.p7s"

MIAGCSqGSIb3DQEHAqCAMIACAQExCzAJBgUrDgMCGgUAMIAGCSqGSIb3DQEHAQAAoIIFsTCCAoAw
ggHpoAMCAQICAwQk1DANBgkqhkiG9w0BAQQFADCBkjELMAkGA1UEBhMCWkExFTATBgNVBAgTDFdl
c3Rlcm4gQ2FwZTESMBAGA1UEBxMJQ2FwZSBUb3duMQ8wDQYDVQQKEwZUaGF3dGUxHTAbBgNVBAsT
FENlcnRpZmljYXRlIFNlcnZpY2VzMSgwJgYDVQQDEx9QZXJzb25hbCBGcmVlbWFpbCBSU0EgMjAw
MC44LjMwMB4XDTAxMDIwODIzMTg0NFoXDTAyMDIwODIzMTg0NFowRTEfMB0GA1UEAxMWVGhhd3Rl
IEZyZWVtYWlsIE1lbWJlcjEiMCAGCSqGSIb3DQEJARYTc2h1aUBsdW5hbWVkaXVtLmNvbTCBnzAN
BgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEAyaNth0pebR3t9/AyEqLBdLYiq+rfIxCXFPswkMxaGjuF
3breY5PcRSFBeKh21Z57A2m+pm/PXBaoNv5Ge0RSP/A9E1l0e5115uan86gdbyzaNUq8rIbTvjeG
1CDi5BpjroJAFc0Wyci3gDYEiy1gwAKe1j+XHx6CcRvc0yKgXDMCAwEAAaMwMC4wHgYDVR0RBBcw
FYETc2h1aUBsdW5hbWVkaXVtLmNvbTAMBgNVHRMBAf8EAjAAMA0GCSqGSIb3DQEBBAUAA4GBAKZw
n1dj59mKwjSIeth0yEaNNLCZQx2kpnc/NPEU0JIdhtcSmJzsLYCzgM+Q7GqLVOMx8rVKDwUGPVBC
TfteDXWAT6rHmddLJzEBlTzcNY+7MT+e1Z9d7TXFkS3MlmRRFepj83dV7846fskfPXWuo1ppoB6K
/f34m6EcFTByR4vpMIIDKTCCApKgAwIBAgIBDDANBgkqhkiG9w0BAQQFADCB0TELMAkGA1UEBhMC
WkExFTATBgNVBAgTDFdlc3Rlcm4gQ2FwZTESMBAGA1UEBxMJQ2FwZSBUb3duMRowGAYDVQQKExFU
aGF3dGUgQ29uc3VsdGluZzEoMCYGA1UECxMfQ2VydGlmaWNhdGlvbiBTZXJ2aWNlcyBEaXZpc2lv
bjEkMCIGA1UEAxMbVGhhd3RlIFBlcnNvbmFsIEZyZWVtYWlsIENBMSswKQYJKoZIhvcNAQkBFhxw
ZXJzb25hbC1mcmVlbWFpbEB0aGF3dGUuY29tMB4XDTAwMDgzMDAwMDAwMFoXDTAyMDgyOTIzNTk1
OVowgZIxCzAJBgNVBAYTAlpBMRUwEwYDVQQIEwxXZXN0ZXJuIENhcGUxEjAQBgNVBAcTCUNhcGUg
VG93bjEPMA0GA1UEChMGVGhhd3RlMR0wGwYDVQQLExRDZXJ0aWZpY2F0ZSBTZXJ2aWNlczEoMCYG
A1UEAxMfUGVyc29uYWwgRnJlZW1haWwgUlNBIDIwMDAuOC4zMDCBnzANBgkqhkiG9w0BAQEFAAOB
jQAwgYkCgYEA3jMypmPHCSVFPtJueCdngcXaiBmClw7jRCmKYzUqbXA8+tyu9+50bzC8M5B/+TRx
oKNtmPHDT6Jl2w36S/HW3WGl+YXNVZo1Gp2Sdagnrthy+boC9tewkd4c6avgGAOofENCUFGHgzzw
ObSbVIoTh/+zm51JZgAtCYnslGvpoWkCAwEAAaNOMEwwKQYDVR0RBCIwIKQeMBwxGjAYBgNVBAMT
EVByaXZhdGVMYWJlbDEtMjk3MBIGA1UdEwEB/wQIMAYBAf8CAQAwCwYDVR0PBAQDAgEGMA0GCSqG
SIb3DQEBBAUAA4GBAHMbbyZli/8VNEtZYortRL5Jx+gNu4+5DWomKmKEH7iHY3QcbbfPGlORS+HN
5jjZ7VD0Omw0kqzmkpxuwSMBwgmn70uuct0GZ/VQby5YuLYLwVBXtewc1+8XttWIm7eiiBrtOVs5
fTT8tpYYJU1q9J3Fw5EvqZa4BTxS/N3pYgNIMYICyDCCAsQCAQEwgZowgZIxCzAJBgNVBAYTAlpB
MRUwEwYDVQQIEwxXZXN0ZXJuIENhcGUxEjAQBgNVBAcTCUNhcGUgVG93bjEPMA0GA1UEChMGVGhh
d3RlMR0wGwYDVQQLExRDZXJ0aWZpY2F0ZSBTZXJ2aWNlczEoMCYGA1UEAxMfUGVyc29uYWwgRnJl
ZW1haWwgUlNBIDIwMDAuOC4zMAIDBCTUMAkGBSsOAwIaBQCgggGDMBgGCSqGSIb3DQEJAzELBgkq
hkiG9w0BBwEwHAYJKoZIhvcNAQkFMQ8XDTAxMDIyNzE2NTgyNFowIwYJKoZIhvcNAQkEMRYEFIVi
j7476N+YdWIH60FRMhWpVFzaMHYGCSqGSIb3DQEJDzFpMGcwCgYIKoZIhvcNAwcwDgYIKoZIhvcN
AwICAgCAMAcGBSsOAwIHMAcGBSsOAwIHMA0GCCqGSIb3DQMCAgEoMAcGBSsOAwIaMAcGBSsOAwIa
MAoGCCqGSIb3DQIFMAoGCCqGSIb3DQIFMIGrBgkrBgEEAYI3EAQxgZ0wgZowgZIxCzAJBgNVBAYT
AlpBMRUwEwYDVQQIEwxXZXN0ZXJuIENhcGUxEjAQBgNVBAcTCUNhcGUgVG93bjEPMA0GA1UEChMG
VGhhd3RlMR0wGwYDVQQLExRDZXJ0aWZpY2F0ZSBTZXJ2aWNlczEoMCYGA1UEAxMfUGVyc29uYWwg
RnJlZW1haWwgUlNBIDIwMDAuOC4zMAIDBCTUMA0GCSqGSIb3DQEBAQUABIGAbxVpoRGzp/uL/XrY
gfvaNDS7Mi6WUBnWlrtN1xD6ZYPiYZmUDGjKwqB9aCsAJt/v9J2B65tAZEJOttsNOLCd1+QN69Bu
3blaEMiY9XjNQ2ee0lZNYr8Hf+Is+tgLbOt0olq5qqKGaqSz+k+bFqP8nFgSUQtBnMk6K0tqVeLk
i7YAAAAAAAA=

------=_NextPart_000_0012_01C0A09B.716D56E0--