Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Passing variable to perl
Top Forums Shell Programming and Scripting Passing variable to perl Post 302075753 by TheCrunge on Tuesday 6th of June 2006 03:23:27 PM
Old 06-06-2006
Passing variable to perl
I need a non-perl (bash) way to strip the path from a list of "find" results. Below is the perl version which I could use, if I could figure out how to call the script with a variable (like in sh, $1 is the variable passed in ./script variable)

Code:
$file = "/path/to/file.txt";

# How do I reference an argument, like in bash:
$file = $1 # is wrong, how is it done in perl?

$dirname = $filename = $file;
$dirname =~ s!^(.*/)[^/]*$!\1!;
$filename =~ s!^.*/([^/]*)$!\1!;

print( "Directory path: $dirname\n" );
print( "Filename: $filename\n" );

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

passing variable from bash to perl from bash script

Hi All, I need to pass a variable to perl script from bash script, where in perl i am using if condition. Here is the cmd what i am using in perl FROM_DATE="06/05/2008" TO_DATE="07/05/2008" "perl -ne ' print if ( $_ >="$FROM_DATE" && $_ <= "$TO_DATE" ) ' filename" filename has... (10 Replies)
Discussion started by: arsidh
10 Replies

2. Shell Programming and Scripting

Passing date formats in Perl: i.e. Jul/10/2007 -> 20070710 (yyyymmdd) - Perl

Hi , This script working for fine if pass script-name.sh Jul/10/2007 ,I want to pass 20070710(yyyymmdd) .Please any help it should be appereciated. use Time::Local; my $d = $ARGV; my $t = $ARGV; my $m = ""; @d = split /\//, $d; @t = split /:/, $t; if ( $d eq "Jan" ) { $m = 0 }... (7 Replies)
Discussion started by: akil
7 Replies

3. UNIX for Advanced & Expert Users

Passing Hash variable in to sql query in perl

Hi Everyone, Can anyone help me how do i call hash variable in to sql query in perl. Please see the script below i have defined two Hash %lc and %tab as below $lc{'REFF'}='V_RES_CLASS'; $lc{'CALE'}='V_CAP_CLASS'; $lc{'XRPD'}='V_XFMR_CLASS'; $tab{'V_RES_CLASS'}='V_MFR_SERS';... (6 Replies)
Discussion started by: jam_prasanna
6 Replies

4. Shell Programming and Scripting

Passing variable and wild card character to grep in Perl

HI All, I have a script that needs to find out a list of files in a directory, i pass the search parameter as an argument. opendir ( DIR, $dir ) || die "Error in opening dir $dirname\n"; @filename1 = (grep {/$File_pattern/ } readdir(DIR)); The problem is my file patterns are like... (1 Reply)
Discussion started by: amit1_x
1 Replies

5. Shell Programming and Scripting

PERL script -- calling 'sed' by passing 'variable value'.

Hi Friends, I'm calling 'sed' command inside one perl script, which is to list directory names which are having some date value as their names (in the form YYYYMMDD) with in the range (start and end date). #!/usr/bin/perl -w use strict; use warnings; my $DATA = "/export/home/ganapa"; my... (5 Replies)
Discussion started by: ganapati
5 Replies

6. Shell Programming and Scripting

Passing awk variable in perl -e call

Hi. I am on a Solaris box and have an awk script which calls perl via the command line: timeTester="'"`perl -e 'use Time::Local;my $time = timelocal(10,10,10,10,10,2011 );print $time'`"'" But I want to pass awk variables into this call. These are the example awk variables: secondField = 10... (0 Replies)
Discussion started by: pedro6994
0 Replies

7. Shell Programming and Scripting

Passing perl variable to shell command

Can we pass perl variable to shell commands. If yes, please give some example. (2 Replies)
Discussion started by: Anjan1
2 Replies

8. UNIX for Advanced & Expert Users

Passing variable as input & storing output in other variable

I have a below syntax its working fine... var12=$(ps -ef | grep apache | awk '{print $2,$4}') Im getting expected output as below: printf "%b\n" "${VAR12}" dell 123 dell 456 dell 457 Now I wrote a while loop.. the output of VAR12 should be passed as input parameters to while loop and results... (5 Replies)
Discussion started by: sam@sam
5 Replies

9. Shell Programming and Scripting

Passing variable into perl system commands

Hi guys, I'm having issues getting the following snippet of my script to work and was hoping for some suggestions. I'm trying to pass a variable in perl system with wget. This is what I need help with: #!/usr/bin/perl use strict; use warnings; use POSIX qw(strftime) ; my... (3 Replies)
Discussion started by: timj123
3 Replies

10. Shell Programming and Scripting

Passing variable from bash to perl script

Hi All, I need to pass a variable from bash script to perl script and in the perl script i am using those variables in the sql query but its giving error : Use of uninitialized value $ENV{"COUNTRYCD"} in concatenation (.) or string at /GIS_ROOT/custom/tables/DBread_vendor.pl line 50. Can ... (6 Replies)
Discussion started by: NileshJ
6 Replies

LEARN ABOUT DEBIAN

surfraw-update-path

SURFRAW-UPDATE-PATH(1)					User Contributed Perl Documentation				    SURFRAW-UPDATE-PATH(1)

NAME

       surfraw-update-path - updates PATH in shell config files

SYNOPSIS

       surfraw-update-path [-add] [-remove] [-check] [-sys] [-all] [-help] [-shell=SHELL]

DESCRIPTION

       surfraw-update-path adds the surfraw elvi directory (/usr/lib/surfraw) to your PATH in your shell's config file.

       Currently it supports bash, sh, csh, tcsh, ash, dash, ksh, pdksh, zsh, rc, and es

       Don't forget to login again or source your login files for it to take effect.

OPTIONS

       -check
	   Checks to see if the surfraw config code is present.  This is the default.

       -add
	   Adds the surfraw config code.

       -remove
	   Removes the surfraw config code

       -sys
	   Updates the system-wide shell config instead of the user.  Must be done as root.

       -shell=SHELL
	   Selects the shell to configure. Defaults to the value of the $SHELL environment variable.

	   Currently supported shells are:

	   sh, ash, bash, dash, csh, tcsh, ksh, pdksh, zsh, rc, and es.

       -all
	   Attempts to configure the startup files for all known shells

       -help
	   Gives a usage message

RETURN VALUE

       -check returns 0 if the surfraw code is present in the file, 1 if it is not found, or 2 on error.

       All other options return 0 on success, or 2 on error.

ENVIRONMENT

       SHELL
	   Used to determine which shell to configure, if -shell is not given.

       HOME
	   Used to find users config files.

       ENV Used by posix-compliant shells to specify a startup rc file.

       ZDOTDIR
	   Used to find user config files for zsh. If not set, defaults to HOME.

SEE ALSO

       surfraw(1), sh(1), ash(1), bash(1), dash(1), csh(1), tcsh(1), ksh(1), pdksh(1), zsh(1), rc(1), es(1)

AUTHOR

       Ian Beckwith <ianb@erislabs.net>

perl v5.12.4							    2011-07-12						    SURFRAW-UPDATE-PATH(1)
All times are GMT -4. The time now is 04:02 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy