14 lines
278 B
Rexx
14 lines
278 B
Rexx
/*
|
|
* This is a demo program for Rexx/CURL
|
|
*/
|
|
Call RxFuncAdd 'CurlLoadFuncs', 'rexxcurl', 'CurlLoadFuncs'
|
|
Call CurlLoadFuncs
|
|
|
|
Say 'This is Rexx/CURL:' CurlVariable('VERSION')
|
|
|
|
Call CurlQueryFunction 'out.','A'
|
|
Say 'Available functions:'
|
|
Do i = 1 To out.0
|
|
Say ' 'out.i
|
|
End
|