The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
RapidApp-1.3004
River stage one • 5 direct dependents • 5 total dependents
29 ++
/ RapidApp::JSON::ScriptWithData

NAME

RapidApp::JSON::ScriptWithData

SYNOPSIS

  use RapidApp::JSON::ScriptWithData;
  use RapidApp::JSON::MixedEncoder 'encode_json';
  
  $swd= RapidApp::JSON::ScriptWithData->new(
    'function () {',
      'blah(12345);',
      'var b= foo(bar(', $self->getSomething, '));',
      'var a=', { x=>1, y=>2, z=>3 }, ';',
      'return baz(a, b);',
    '}'
  );
  
  return encode_json($swd);