Re: Perl Pro but Java Newbie: Need nudge in proper direction for my favorite Perl routine in Java

From:

Mark Space <markspace@sbcglobal.net>

Newsgroups:

comp.lang.java.programmer

Date:

Sun, 14 Sep 2008 16:35:13 -0700

Message-ID:

<gak74a$g6p$1@registered.motzarella.org>

/usr/ceo wrote:

print "I have an int as $int, and my dog's name is $dog, and my name
is ${\ $o->name }...\n";

Ah, I see. Yes you could monkey something up but it's probably not
worth it....

class Tests
{

     public static void main( String... args ) throws
IllegalArgumentException,
             IllegalAccessException
     {
// test();
// testVarArgs( "One: ", 1, "\nA: ", 'a', "\nTwo: ", 2.0 );

         class Holder
         {

             int dogs;
             int cats;
         }
         Holder h = new Holder();
         h.dogs = 3;
         h.cats = 1;
         String s = instring(
            "I have $dogs dogs and $cats cats and $fish fish.",
                 h );
         System.out.println( s );
     }

     static String instring( String s, Object o )
             throws IllegalArgumentException,
             IllegalAccessException
     {
         for( Field f : o.getClass().getDeclaredFields() )
         {
             s = s.replaceAll( "\\$"+f.getName(), f.get( o ).toString() );
         }
         return s;
     }
}

OUTPUT:
I have 3 dogs and 1 cats and $fish fish.