1 #

     2 #

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

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

     3 # All rights reserved.

     4 # All rights reserved.

     4 # This component and the accompanying materials are made available

     5 # This component and the accompanying materials are made available

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

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

    20 

    21 

    21 BEGIN {

    22 BEGIN {

    22 # check user has a version of perl that will cope

    23 # check user has a version of perl that will cope

    23 	require 5.005_03;

    24 	require 5.005_03;

    24 # establish the path to the Perl libraries

    25 # establish the path to the Perl libraries

    28 }

    29 }

    29 

    30 

    30 use  lib $PerlLibPath;

    31 use  lib $PerlLibPath;

    31 use spitool qw(&createSpi);

    32 use spitool qw(&createSpi);

    32 createSpi(@ARGV);

    33 createSpi(@ARGV);