ruby-perl 0.99.15j

data/spec/scalar_value_spec.rb

@@ -0,0 +1,82 @@
+require 'spec_helper'
+
+require 'perl/interpreter'
+require 'perl/value/scalar'
+
+describe Perl::Value::Scalar do
+  include PerlValueHelpers
+
+  before(:all) do
+    @interpreter = Perl::Interpreter.new
+  end
+  after(:all) do
+    @interpreter.stop
+  end
+
+  describe "class method" do
+    describe " #to_perl" do
+      it "should return the expected object when passed a String" do
+        input = "something"
+
+        sv = described_class.to_perl(input)
+        sv.should_not be_nil
+
+        ret = described_class.new(sv)
+        ret.should_not be_nil
+        ret.value.should eq(input)
+      end
+
+      it "should return the expected object when passed a StringIO" do
+        input = StringIO.new("something")
+
+        sv = described_class.to_perl(input)
+        sv.should_not be_nil
+
+        ret = described_class.new(sv)
+        ret.should_not be_nil
+        ret.value.should eq(input.string)
+      end
+
+      it "should raise when passed a Fixnum" do
+        lambda { described_class.to_perl(42) }.should raise_error
+      end
+    end
+  end
+
+  context "built without arguments" do
+    its(:perl) { should_not be_nil }
+    its(:scalar) { should be_nil }
+    its(:sv) { should be_nil }
+  end
+
+  context "built from a Fixnum" do
+    let(:input) { 42 }
+    it do
+      lambda { described_class.new(input) }.should raise_error
+    end
+  end
+
+  context "built from a String" do
+    let(:input) { "something" }
+    subject { described_class.new(input) }
+    its(:perl) { should_not be_nil }
+    its(:scalar) { should_not be_nil }
+    its(:scalar) { should eq(input) }
+    its(:sv) { should be_nil }
+
+    describe "when #to_perl is called" do
+      it "should return the expected object" do
+        sv = subject.to_perl
+        sv.should_not be_nil
+
+        ret = described_class.new(sv)
+        ret.should_not be_nil
+        ret.value.should eq(input)
+      end
+
+      it "should cache the returned object" do
+        subject.to_perl.should == subject.sv
+      end
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,39 @@
+# require 'cover_me'
+require 'pathname'
+require 'tempfile'
+
+module SpecHelper
+  def root
+    @root_path ||= Pathname.new(File.expand_path('../../', __FILE__))
+  end
+
+  def support
+    root.join('spec', 'support')
+  end
+
+  module_function :root, :support
+end
+
+Dir["#{SpecHelper.support}/**/*.rb"].each do |f|
+  require f
+end
+
+RSpec.configure do |config|
+  config.mock_with :rspec
+end
+
+module Kernel
+  def capture_stdout_descriptor
+    Tempfile.open("spec") do |file|
+      begin
+        out = $stdout.dup
+        $stdout.reopen(file)
+        yield
+        $stdout.flush
+        return File.read(file)
+      ensure
+        $stdout.reopen(out)
+      end
+    end
+  end
+end

data/spec/support/perl_value_helpers.rb

@@ -0,0 +1,13 @@
+module PerlValueHelpers
+  def self.included(klass)
+    require 'perl/value'
+
+    Perl::Value::Hash.class_eval do
+      attr_reader :perl, :hash, :hv
+    end
+
+    Perl::Value::Scalar.class_eval do
+      attr_reader :perl, :scalar, :sv
+    end
+  end
+end

metadata

@@ -0,0 +1,109 @@
+--- !ruby/object:Gem::Specification 
+name: ruby-perl
+version: !ruby/object:Gem::Version 
+  prerelease: 7
+  version: 0.99.15j
+platform: ruby
+authors: 
+- Andrea Campi
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-04-01 00:00:00 +02:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: ffi
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: 1.0.6
+  type: :runtime
+  version_requirements: *id001
+description: Run Perl code from any Ruby application, or run Perl web apps on Ruby.
+email: 
+- andrea.campi@zephirworks.com
+executables: 
+- rperl
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- .autotest
+- .rspec
+- Gemfile
+- Gemfile.lock
+- README.md
+- Rakefile
+- autotest/discover.rb
+- bin/rperl
+- examples/hello.pl
+- examples/hello.rb
+- examples/hello_block.rb
+- examples/hello_here.rb
+- examples/passenger/config.ru
+- examples/passenger/log/.keep
+- examples/passenger/public/.keep
+- examples/passenger/tmp/.keep
+- examples/passenger/webapp.psgi
+- examples/perl.ru
+- examples/webapp.psgi
+- lib/perl.rb
+- lib/perl/common.rb
+- lib/perl/ext/hash.rb
+- lib/perl/ext/object.rb
+- lib/perl/ext/string.rb
+- lib/perl/ffi_lib.rb
+- lib/perl/internal.rb
+- lib/perl/interpreter.rb
+- lib/perl/rack.rb
+- lib/perl/shell.rb
+- lib/perl/stack.rb
+- lib/perl/stack/function.rb
+- lib/perl/value.rb
+- lib/perl/value/array.rb
+- lib/perl/value/hash.rb
+- lib/perl/value/scalar.rb
+- spec/ext/hash_spec.rb
+- spec/ext/object_spec.rb
+- spec/ext/string_spec.rb
+- spec/hash_value_spec.rb
+- spec/interpreter_spec.rb
+- spec/scalar_value_spec.rb
+- spec/spec_helper.rb
+- spec/support/perl_value_helpers.rb
+has_rdoc: true
+homepage: http://github.com/zephirworks/ruby-perl
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: 1.3.6
+requirements: []
+
+rubyforge_project: ruby-perl
+rubygems_version: 1.6.2
+signing_key: 
+specification_version: 3
+summary: Run Perl code from any Ruby application.
+test_files: []
+