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...
Here's a sample of the output this produces:
So I need to do the same thing in Perl...any takers?
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)
Hi all experts,
I am new to Unix. Could you please help me to convert the following PERL script to SHELL? I will appreciate.
#!/bin/sh
use strict;
use warnings;
my $robot_num = 0;
my %rob_tapes;
foreach (`/usr/openv/volmgr/bin/vmquery -l -rn $robot_num`)
{ $rob_tapes{(split)} = 1; }... (6 Replies)
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)
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)
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)
Hi is there a way that i can convert this simple perl program into shell script
#!usr/bin/perl -w
use strict;
use warnings;
open INPUTFILE, "uniqprobecoordinates.out" || die "canot open the file $!";
open OUTPUTFILE, ">", "1_4reads.out";
while(<INPUTFILE>)
{
chomp;
... (3 Replies)
Hi
I am a novice in scripting .Please help me converting perl script into shell
my ($ref) = shift;
my $id;
my $cnt=0;
my $first =0;
my $filename ;
my $filename1 ;
FOREACH:foreach my $r (qw(RET LSH PDM )) {
$ref->{$cnt}->{num_errors} =0;
$ref->{$cnt}->{num_warnings} =0;... (2 Replies)
HI All, I am new in shell scripting ,can any one please help me to convert this scripts from Perl to Shell.
Thank in advance.
$customer=$ARGV;
$rows=`hadoop fs -ls /ncip/$customer/|wc -l`;
if($rows==3){
print "$customer directory exists , cleaning up ! \n";
`hadoop fs -rm... (1 Reply)
Discussion started by: Atul301
1 Replies
LEARN ABOUT DEBIAN
pkgproto
pkgproto(1) User Commands pkgproto(1)NAME
pkgproto - generate prototype file entries for input to pkgmk command
SYNOPSIS
pkgproto [-i] [-c class] [path1]
pkgproto [-i] [-c class] [path1=path2...]
DESCRIPTION
pkgproto scans the indicated paths and generates prototype(4) file entries that may be used as input to the pkgmk(1) command.
If no paths are specified on the command line, standard input is assumed to be a list of paths. If the pathname listed on the command line
is a directory, the contents of the directory is searched. However, if input is read from stdin, a directory specified as a pathname will
not be searched.
OPTIONS -i Ignores symbolic links and records the paths as ftype=f (a file) versus ftype=s (symbolic link).
-c class Maps the class of all paths to class.
OPERANDS
path1 Pathname where objects are located.
path2 Pathname which should be substituted on output for path1.
EXAMPLES
Example 1: Examples of the use of pkgproto.1.
The following two examples show uses of pkgproto and a partial listing of the output produced.
Example 1:
example% pkgproto /bin=bin /usr/bin=usrbin /etc=etc
f none bin/sed=/bin/sed 0775 bin bin
f none bin/sh=/bin/sh 0755 bin daemon
f none bin/sort=/bin/sort 0755 bin bin
f none usrbin/sdb=/usr/bin/sdb 0775 bin bin
f none usrbin/shl=/usr/bin/shl 4755 bin bin
d none etc/master.d 0755 root daemon
f none etc/master.d/kernel=/etc/master.d/kernel 0644 root daemon
f none etc/rc=/etc/rc 0744 root daemon
Example 2:
example% find / -type d -print | pkgproto
d none / 755 root root
d none /bin 755 bin bin
d none /usr 755 root root
d none /usr/bin 775 bin bin
d none /etc 755 root root
d none /tmp 777 root root
EXIT STATUS
0 Successful completion.
>0 An error occurred.
ATTRIBUTES
See attributes(5) for descriptions of the following attributes:
+-----------------------------+-----------------------------+
| ATTRIBUTE TYPE | ATTRIBUTE VALUE |
+-----------------------------+-----------------------------+
|Availability |SUNWcsu |
+-----------------------------+-----------------------------+
SEE ALSO pkgmk(1), pkgparam(1), pkgtrans(1), prototype(4), attributes(5)
Application Packaging Developer's Guide
NOTES
By default, pkgproto creates symbolic link entries for any symbolic link encountered (ftype=s). When you use the -i option, pkgproto cre-
ates a file entry for symbolic links (ftype=f). The prototype(4) file would have to be edited to assign such file types as v (volatile), e
(editable), or x (exclusive directory). pkgproto detects linked files. If multiple files are linked together, the first path encountered is
considered the source of the link.
By default, pkgproto prints prototype entries on the standard output. However, the output should be saved in a file (named Prototype or
prototype, for convenience) to be used as input to the pkgmk(1) command.
SunOS 5.10 6 Nov 2000 pkgproto(1)