Sponsored Content
Top Forums Shell Programming and Scripting how to get last value in an array in perl Post 302164298 by meghana on Monday 4th of February 2008 11:16:48 AM
Old 02-04-2008
i have got a solution ... its little different but it works.....

my @files = glob("file*");
my $last_file_name = pop(@files);

thanks for ur quick replies again........
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

[Perl] Accessing array elements within a sed command in Perl script

I am trying to use a script to replace the header of each file, whose filename are stored within the array $test, using the sed command within a Perl script as follows: $count = 0; while ( $count < $#test ) { `sed -e 's/BIOGRF 321/BIOGRF 332/g' ${test} > 0`; `cat 0 >... (2 Replies)
Discussion started by: userix
2 Replies

2. Shell Programming and Scripting

perl -write values in a file to @array in perl

Hi can anyone suggest me how to write a file containing values,... say 19 20 21 22 .. 40 to an array @array = (19, 20, ... 40) -- Thanks (27 Replies)
Discussion started by: meghana
27 Replies

3. Shell Programming and Scripting

Perl grep array against array

Hi, Is there any way I can grep an array against another array? Basically here's what I need to do. There will be an array containing some fixed texts and I have to check whether some files contain these lines. Reading the same files over and over again for each different pattern doesnt seem... (1 Reply)
Discussion started by: King Nothing
1 Replies

4. Shell Programming and Scripting

perl, put one array into many array when field is equal to sth

Hi Everyone, #!/usr/bin/perl use strict; use warnings; my @test=("a;b;qqq;c;d","a;b;ggg;c;d","a;b;qqq;c;d"); would like to split the @test array into two array: @test1=(("a;b;qqq;c;d","a;b;qqq;c;d"); and @test2=("a;b;ggg;c;d"); means search for 3rd filed. Thanks find the... (0 Replies)
Discussion started by: jimmy_y
0 Replies

5. Shell Programming and Scripting

perl array help !

I have a list of items in array say @array1=(apple=2,orange=3,peas=15,spinach=50); Another array has values say @array2=(apple,orange,plums,pineapple); I need to display a list if @array2 values is present in @array1 .else I need to print of the form(The final o/p may look like this.) OUTPUT... (5 Replies)
Discussion started by: gameboy87
5 Replies

6. Shell Programming and Scripting

Array in Perl - Detect several file to be in one array

Hi everyone I have one question about using array in perl. let say I have several log file in one folder.. example test1.log test2.log test3.log and the list goes on.. how to make an array for this file? It suppose to detect log file in the current directory and all the log file will... (3 Replies)
Discussion started by: sayachop
3 Replies

7. Shell Programming and Scripting

PERL : Read an array and write to another array with intial string pattern checks

I have an array and two variables as below, I need to check if $datevar is present in $filename. If so, i need to replace $filename with the values in the array. I need the output inside an ARRAY How can this be done. Any help will be appreciated. Thanks in advance. (2 Replies)
Discussion started by: irudayaraj
2 Replies

8. 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

9. Shell Programming and Scripting

Perl Array help

okay so my job is requiring me to learn perl and i have never had any type of programming language... ever. So i need to take a file that has data (nodes/points) with x, y, and z components. Example of what the file contains is below: RANDOM TEXT RANDOM TEXT Node # x pos ... (23 Replies)
Discussion started by: dets34
23 Replies

10. Shell Programming and Scripting

Perl array

Hi. I have 2 arrays, @result and @comment. Result contains 1 2 3 and comment contains a b c my code is below my @multi = (@result, @comment); foreach (@multi) { print array; } For this I am getting result 1 2 (2 Replies)
Discussion started by: sauravrout
2 Replies
glob(n) 						       Tcl Built-In Commands							   glob(n)

__________________________________________________________________________________________________________________________________________________

NAME
glob - Return names of files that match patterns SYNOPSIS
glob ?switches? pattern ?pattern ...? _________________________________________________________________ DESCRIPTION
This command performs file name ``globbing'' in a fashion similar to the csh shell. It returns a list of the files whose names match any of the pattern arguments. If the initial arguments to glob start with - then they are treated as switches. The following switches are currently supported: | -directory directory | Search for files which match the given patterns starting in the given directory. This allows searching of directories whose name | contains glob-sensitive characters without the need to quote such characters explicitly. This option may not be used in conjunction | with -path, which is used to allow searching for complete file paths whose names may contain glob-sensitive characters. | -join | The remaining pattern arguments are treated as a single pattern obtained by joining the arguments with directory separators. -nocomplain Allows an empty list to be returned without error; without this switch an error is returned if the result list would be empty. | -path pathPrefix | Search for files with the given pathPrefix where the rest of the name matches the given patterns. This allows searching for files | with names similar to a given file (as opposed to a directory) even when the names contain glob-sensitive characters. This option | may not be used in conjunction with -directory. For example, to find all files with the same root name as $path, but differing | extensions, you should use glob -path [file rootname $path] .* which will work even if $path contains numerous glob-sensitive char- | acters. | -tails | Only return the part of each file found which follows the last directory named in any -directory or -path path specification. Thus | glob -tails -directory $dir * is equivalent to set pwd [pwd] ; cd $dir ; glob *; cd $pwd. For -path specifications, the returned | names will include the last path segment, so glob -tails -path [file rootname ~/foo.tex] .* will return paths like foo.aux foo.bib | foo.tex etc. | -types typeList | Only list files or directories which match typeList, where the items in the list have two forms. The first form is like the -type | option of the Unix find command: b (block special file), c (character special file), d (directory), f (plain file), l (symbolic | link), p (named pipe), or s (socket), where multiple types may be specified in the list. Glob will return all files which match at | least one of the types given. | The second form specifies types where all the types given must match. These are r, w, x as file permissions, and readonly, hidden | as special permission cases. On the Macintosh, MacOS types and creators are also supported, where any item which is four characters | long is assumed to be a MacOS type (e.g. TEXT). Items which are of the form {macintosh type XXXX} or {macintosh creator XXXX} will | match types or creators respectively. Unrecognized types, or specifications of multiple MacOS types/creators will signal an error. | The two forms may be mixed, so -types {d f r w} will find all regular files OR directories that have both read AND write permis- | sions. The following are equivalent: | glob -type d * | glob */ | except that the first case doesn't return the trailing ``/'' and is more platform independent. | -- Marks the end of switches. The argument following this one will be treated as a pattern even if it starts with a -. The pattern arguments may contain any of the following special characters: ? Matches any single character. * Matches any sequence of zero or more characters. [chars] Matches any single character in chars. If chars contains a sequence of the form a-b then any character between a and b (inclu- sive) will match. x Matches the character x. {a,b,...} Matches any of the strings a, b, etc. On Unix, as with csh, a ``.'' at the beginning of a file's name or just after a ``/'' must be matched explicitly or with a {} construct, unless the ``-types hidden'' flag is given (since ``.'' at the beginning of a file's name indicates that it is hidden). On other plat- forms, files beginning with a ``.'' are handled no differently to any others, except the special directories ``.'' and ``..'' which must be matched explicitly (this is to avoid a recursive pattern like ``glob -join * * * *'' from recursing up the directory hierarchy as well as down). In addition, all ``/'' characters must be matched explicitly. If the first character in a pattern is ``~'' then it refers to the home directory for the user whose name follows the ``~''. If the ``~'' is followed immediately by ``/'' then the value of the HOME environment variable is used. The glob command differs from csh globbing in two ways. First, it does not sort its result list (use the lsort command if you want the list sorted). Second, glob only returns the names of files that actually exist; in csh no check for existence is made unless a pattern contains a ?, *, or [] construct. PORTABILITY ISSUES
Unlike other Tcl commands that will accept both network and native style names (see the filename manual entry for details on how native and network names are specified), the glob command only accepts native names. Windows For Windows UNC names, the servername and sharename components of the path may not contain ?, *, or [] constructs. On Windows NT, if pattern is of the form ``~username@domain'' it refers to the home directory of the user whose account information resides on the specified NT domain server. Otherwise, user account information is obtained from the local computer. On Windows 95 and 98, glob accepts patterns like ``.../'' and ``..../'' for successively higher up parent directories. Since the backslash character has a special meaning to the glob command, glob patterns containing Windows style path separators need special care. The pattern C:\foo\* is interpreted as C:foo* where f will match the single character f and * will match the single character * and will not be interpreted as a wildcard character. One solution to this problem is to use the Unix style for- ward slash as a path separator. Windows style paths can be converted to Unix style paths with the command file join $path (or file normalize $path in Tcl 8.4). Macintosh When using the options, -directory, -join or -path, glob assumes the directory separator for the entire pattern is the standard ``:''. When not using these options, glob examines each pattern argument and uses ``/'' unless the pattern contains a ``:''. SEE ALSO
file(n) KEYWORDS
exist, file, glob, pattern Tcl 8.3 glob(n)
All times are GMT -4. The time now is 10:22 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy