#1
  1. No Profile Picture
    Registered User
    Devshed Newbie (0 - 499 posts)

    Join Date
    Aug 2012
    Posts
    7
    Rep Power
    0

    Need Help: invoking TCL procedure in perl scripts.


    Hi All,

    I am writing scripts in perl and need to automate few IXIA related stuff. IXIA has TCL based API's.
    Can someone help me understand, how I can call those API's inside my perl scripts or if there is a way to write a wrapper for TCL API's in perl.

    Regards,
    Kuldeep Kumar.
  2. #2
  3. Contributing User
    Devshed Newbie (0 - 499 posts)

    Join Date
    Apr 2012
    Location
    spaceBAR Central
    Posts
    225
    Rep Power
    41
    I believe someone has given you this info:http://www.perlmonks.org/?node_id=988956

    You can also run a script from perl via the 'system' function:


    Code:
    # Run Command
    $shell_return_status  =  system("$command > $logtemp 2>&1 ");
    if ($shell_return_status  !=  0) {
      writelog ("ERR $command failed; $shell_return_status");
    }

IMN logo majestic logo threadwatch logo seochat tools logo