Tech Tip

I've got a situation where I need to pass some variables from a D3 program into a Perl script, then get a result back into D3 again.

You may pass data through standard in/out streams.

:U BP TEST
001 *
002 data 'string1'
003 data 'string2'
004 execute '!/home/pick/ptest' capturing out
005 for i=1 to 2
006 crt out<i>
007 next i

:U UNIX:/home/pick/ ptest
001 #!/usr/bin/perl
002
003 $s1=<STDIN>;
004 chomp $s1;
005
006 $s2=<STDIN>;
007 chomp $s2;
008
009 print "-$s1-\n";
010 print "-$s2-\n";

:!chmod 755 /home/pick/ptest

Solution supplied on Rainning Data Tech Forum:
http://forums.rainingdata.com/index.php?showtopic=1233

menu
menu