Sponsored Content
Top Forums Shell Programming and Scripting convert PERL script to SHELL script Post 302266895 by tderscheid on Thursday 11th of December 2008 09:26:16 AM
Old 12-11-2008
From PERL script to single line shell - "What's the status of my Netbackup Media?"

Heh. This took some sweating and cursing. Finally had to talk to the AWK guru in my office.

Code:
bpmedialist -l | awk '{print "echo `echo \"obase=2;"$15+4096"\" | bc` "$1}' | sh | cut -c10,13,14-99 | sort -n -n

This prints a list of media, sorted by Status code, then by Media ID, where 0 is available, 01 is Frozen, 10 is Full, and 11 is Full/Frozen. Took about 10 seconds to run for me, though I only have about 1800 tapes in the library.

I presume you're doing this so you can eject full and/or frozen tapes from your robot and load available tapes into the robot. You could put this in crontab and have it email to you right before you get to work every day, so you have an action plan for being the robot stableboy.

Curtis W. Preston has an excellent script out there called CLAM (Curtis' Library Automation Menu) that is an great place to look. It uses Perl but also includes easy "shove tapes into robot" and "extract tapes from robot" that is much faster than goofing with the GUI. We had to do minor tweaks to make it work with Netbackup 6.5.
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

convert the below perl sript to shell script

perl script: my $logdir = '/smp/dyn/logfiles/fsm/mp/mp'; $logdir = $logdir ."/mp${toDate}*"; i tried to make it..as below .. but not working .. date +%m%d%y logdir = /smp/dyn/logfiles/fsm/mp/mp logdir=$logdir/mp"$date" but it was not working..... can someone please help me out in... (1 Reply)
Discussion started by: mail2sant
1 Replies

2. Shell Programming and Scripting

Shell/Perl script to convert to Capitalize case

I need a shell script which will convert the given string within a <title> tag to Capitalize case. E.g "<title>hi man: check this out</title>" to "<title>Hi Man: Check This Out</title>" (11 Replies)
Discussion started by: parshant_bvcoe
11 Replies

3. Shell Programming and Scripting

Convert .sh script into perl

Good afternoon to you all I really need your help I have the following script developed in .sh and I need to convert it into perl. Can someone help me do it please? Here´s the script: ############################################## ############################################## ... (3 Replies)
Discussion started by: zarahel
3 Replies

4. Shell Programming and Scripting

convert perl code to shell script

This is about how to Monitoring folder for new files using shell script im doing a project using smsserver tools 3. i have used a perl script to handle incoming messages. the content of each message must be directed to a java program. this program generates the answer to reply to the user... (2 Replies)
Discussion started by: x34
2 Replies

5. Shell Programming and Scripting

how to convert a shell script to a php script for displaying next word after pattern match

I have a shell script which I made with the help of this forum #!/bin/sh RuleNum=$1 cat bw_rules | sed 's/^.*-x //' | awk -v var=$RuleNum '$1==var {for(i=1;i<=NF;i++) {if($i=="-bwout") print $(i+3),$(i+1)}}' Basically I have a pages after pages of bandwidth rules and the script gives... (0 Replies)
Discussion started by: sb245
0 Replies

6. Shell Programming and Scripting

Help: how to convert perl script to shell script

bash$ mdb-schema x.mdb | perl -wpe 's%^DROP TABLE %DROP TABLE IF EXISTS %i; s%(Memo/Hyperlink|DateTime( \(Short\))?)%TEXT%i; s%(Boolean|Byte|Byte|Numeric|Replication ID|(\w+ )?Integer)%INTEGER%i; s%(BINARY|OLE|Unknown (+)?)%BLOB%i; s%\s*\(\d+\)\s*(,?*)$%${1}%;' | sqlite3 x.db ... (1 Reply)
Discussion started by: jackpapa
1 Replies

7. Shell Programming and Scripting

HELP on Perl array / sorting - trying to convert Korn Shell Script to Perl

Hi all, Not sure if this should be in the programming forum, but I believe it will get more response under the Shell Programming and Scripting FORUM. Am trying to write a customized df script in Perl and need some help with regards to using arrays and file handlers. At the moment am... (3 Replies)
Discussion started by: newbie_01
3 Replies

8. Shell Programming and Scripting

Convert shell script to Perl

Hello,,I have a very small script that contains these lines; and it works perfectly; however I need to use Perl now as I will need to feel variables from a MySQL table into this; to it would be nice to start by converting this first... find / -perm 777 \( -type f -o -type d \) -exec ls -lid {}... (1 Reply)
Discussion started by: gvolpini
1 Replies

9. Shell Programming and Scripting

Kindly help me out to convert this script to shell script.

set +v echo "Program Name :" $0 # echo "Next param :" $1 echo "Next param :" "Username/Password" echo "User Id :" $2 echo "User Name :" $3 echo "Request ID :" $4 echo "Original File Name ... (4 Replies)
Discussion started by: Ganesh1985
4 Replies

10. Shell Programming and Scripting

Can someone convert this python script to perl

There is a python script that I would like converted to a perl script. If someone has the time to convert the script I would appreciate it. You can find the script below: reboot-mb8600/reboot-mb8600.py at master . j4m3z0r/reboot-mb8600 . GitHub #!/usr/bin/python ''' A hacky script to... (1 Reply)
Discussion started by: azdps
1 Replies
MORSE(1)							       MORSE								  MORSE(1)

NAME
morse - A robotics simulator based upon the Blender Game Engine SYNOPSIS
morse [command] [options] DESCRIPTION
Morse, the Modular OpenRobots Simulation Engine, uses the Blender Game Engine to provide a general purpose robot simulator. A robot and its environment are defined in Morse by creating a model in Blender. Actuator and sensor objects are attached to a model, and may be inter- acted with via a variety of middleware protocols. Simulations can be programmed via Python scripts or inside of Blender itself. Currently supported middleware includes YARP, MOOS, ROS, Pocoslibs, as well as a plain socket interface. COMMANDS
[None] Launches the simulator interface with a default scene create filename Creates a new empty scene and launches the simulator interface run filename Runs a simulation without loading the simulator interface exec filename Runs the given Python script with a default scene check Checks the environment is correctly setup to run morse help Displays information regarding the program version Displays the version number SEE ALSO
morseexec(1) blender(1) COPYRIGHT
2009-2010, LAAS-CNRS/ONERA ; 2010-2012, LAAS-CNRS 0.5.2 May 14, 2012 MORSE(1)
All times are GMT -4. The time now is 01:15 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy