calling Jar file

2009-08-19 Thread lemba
Hi All, My perl script is wrapper for Java program. So, I'm calling the jar file in my script. my $compiler = "Compiler.jar" system ( "java -jar $compiler arg1 arg2 arg3" ) or in this way my @args = ( "java", "-jar", "$compiler", "arg1", "arg2", "arg3" ); system( @args ) Both approaches ar

replace text in file

2009-02-25 Thread lemba
Hi All, I'm trying to replace some text in file. Below is my script. It basically makes a copy of line with changes. How can I replace pattern in the uxix sed way? use strict; use warnings; use Cwd; use Win32; use File::Path; use File::Find; use File::Basename; @ARGV = Win32::GetCwd() unless