#

# Copyright (c) 2009 Nokia Corporation and/or its subsidiary(-ies).

# All rights reserved.

# This component and the accompanying materials are made available

# under the terms of "Eclipse Public License v1.0"

# which accompanies this distribution, and is available

# at the URL "http://www.eclipse.org/legal/epl-v10.html".

#

# Initial Contributors:

# Nokia Corporation - initial contribution.

#

# Contributors:

#

# Description: 

#

use File::Find;

$cp = $ENV{'OMJ_PP_CP'};

$root_dir = $ENV{'OMJ_PP_ROOT_DIR'};

$jar_dir = $ENV{'OMJ_PP_JAR_DIR'};

@javac = ("javac", "-cp", "$cp", ,"-d", "classes", "myClass.java");

my $current_dir;

sub process_dir {

    if (-d $_)

    {

        $current_dir = $_;

    }

    $current_file = $_;

    @jar = ("jar", "-cf", "$jar_dir$current_dir.jar","-C","classes",".");

    if ($current_file eq "myClass.java")

    {

       system("mkdir","classes");

       system(@javac);

       system(@jar);

    }

}

find(\&process_dir, $root_dir);