Registration

[wei ye]

Hi,

I'm going to upload a module Jvm, which allow Perl invoke Java API, so
I'm applying a userID.

I attached the document of my package at the end for your reference.
I have a Java project for our company, but I like Perl very much, I
started
to try to find a way to call Java in Perl, I did find out there is a
module "Java"
in CPAN, however that module launch Java server localhost and have Perl
talk with that Java server via some protocol instead of JNI.
The performance is poor, I don't like it. Then later, I happen to know
that
PHP has a java module, then I asked myself why not write such module for

Perl myself?

Then I began to work on it. Almost at the end of the project, I read a
news from
mailinglist that there is already a module "JPL" has been available for
perl and
Java communication for more than 2 years. Out of surprise,  I downloaded
it and
gave it a try.  I understand that JPL's idea is very cool, however it
seems too complex.
Mine is much simple and more practice for some people.

So I still want to upload to CPAN, so that people want to call Java API
inside perl
has an alternative way to do that.


Below is my personal information:
Name: Ye, Wei
Email: [EMAIL PROTECTED]
HomePage: undef
Perferred UID: YEWEI
Description of what I'm planning to contribute: Jvm, a module which can
invoke Java VM API.
DSLI:
  Development Stage: a/b (Alpha/Beta)
  Support Level: d (Developer)
  Language:  c(C and Perl)
  Interface:  O(Object oriented)

Thanks for your help!



NAME
    Jvm - Perl extension for Java VM invocation

SYNOPSIS
      use Jvm;

      # Initialize the JVM
      new Jvm();

      ###################################
      #invoke static method of Java class
      ###################################
      #Java:
      #   Thread.sleep(1000);
      Jvm::call("java.lang.Thread", "sleep", "(J)V", 1000);

      ##########################
      #Java instance manipulate
      ##########################
      #Java:
      # Integer obj = new Integer(99);
      # String s = i.toString();
      $obj = new Jvm("java.lang.Integer", "(I)V", 99);
      $s = $obj->toString("()Ljava/lang/String;");

      #######################
      #get/set static member
      #######################
      #Java:
      # System.out.println("Hello world!");
      $out = Jvm::getProperty("java.lang.System", "out", "Ljava/io/PrintStream;");
      $out->println("(Ljava/lang/String;)V", "Hello world!");

DESCRIPTION
    This package allow you to invoke Java API in Perl. You can invoke
    standard Java classes as well as your own Java program.

Java Signature
    You have to specify Java method signature when call Java API. This is
    because a java class may have more than 1 methods which has the same
    method name, e.g.

        public class Foo {
            public static void test(int i) {}
            public static void test(byte b) {}
        };

    You have to use method signature to specify which method you are going
    to call. Here is a sample to invoke them respectively:

    Jvm::call("Foo","test","(I)V", 1234567); Jvm::call("Foo","test","(B)V",
    22);

    Java Signature rule is simple, you can get it at
    http://java.sun.com/j2se/1.3/docs/guide/jni/spec/types.doc.html#16432

    Or, you can use 'javap' tool comes with JDK to print out all the
    signatures in your class: usage is 'javap -s Your_java_class'. Here is
    an example:

      [root@ywlap Jvm]# javap -s Foo
      Compiled from Foo.java
      public class Foo extends java.lang.Object {
          public static void test(int);
            /*   (I)V   */
          public static void test(byte);
            /*   (B)V   */
          public Foo();
            /*   ()V   */
      }
      [root@ywlap Jvm]# 

Function List
    new Jvm();
        Initialize JVM.

    $obj = new Jvm($class, $constructorMethodSig, @args);
        create a Java object, whose class name is $class, constructor has
        $constructorMethodSig signature, and @args are arguments for
        constructor. Then later you can invoke method XXX of this instance:
        $result = $obj->XXX($methodSignature, @args);

    $ret = call($class, $method, $methodSignature, @args);
        Invoke static method $method which has the signature
        $methodSignature of class $class.

    $ver = getVersion();
        return current JVM version.

    $value = getProperty($class, $member, $memberSignature);
        return value of static member $member of class $class.

    setProperty($class, $member, $memberSignature, $value);
        set static member of class $class to $value.

    dump($obj)
        This function invokes "System.out.println($obj)" to dump the java
        object $obj.

AUTHOR
        Ye, Wei [EMAIL PROTECTED]

SEE ALSO
        perl(1).

        Java JNI Specification http://java.sun.com/j2se/1.3/docs/guide/jni/

        JPL JPL is a very complex language, it allows you to invoke Java in
        Perl as well as embed Perl in java. It's bundled with Perl5.6, and
        you can get it at: http://users.ids.net/~bjepson/jpl/cvs.html