Thanks for the help.
but if latest was only a part of my string what should i do.
i mean i have folder like
'ABC/a/c/g(base) /123_latest_6678090765abcww12/ Tail?
I am am trying to learn perl and thinking of what all i can handle with various scenarios.
Will be glad if you can help.
Thanks
Quote:
Originally Posted by Skrynesaver
Code:
perldoc -f opendir
perldoc -f readdir
I'm not sure I follow your question but you can use the above to to read through directories and thus select your file.
something like the following may suit or at least be hackable into something that suits
Code:
my $base='ABC/a/c/g';
my $tail='z/x/c';
opendir BASE, $base;
my @subdirs = readir BASE;
for my $dir (@subdirs){
if (($dir=~/latest/) && ( -d "$base/$dir")){
if ( -f "$base/$dir/$tail/final.html"){
print "$base/$dir/$tail/final.html";
}
}
}
Of course I may have wildly misunderstood your spec and something like File::Find may be more suitable for your needs.
Hey all,
I've been trying to learn Perl on my BSD box. When it came to printing the files out, it bothered me that the lines weren't numbered. So here's my little *crap* claim to some-form-of-fame Perl script which numbers files:
... (9 Replies)
Hi
I am having a file with 243 lines..
The file format s given below
eg
P25787 hsa03050 1 P20618 hsa03050 1
P25786 hsa03050 1 P49721 hsa03050 1
P54132 hsa03440 1 Q13472 hsa03470 1
Q05513 hsa04530 hsa04910 hsa04930 3 Q04759 ... (0 Replies)
I wish to write a Perl program that will provide a listing of files in a directory. The files must be listed in sorted order by the file name.
• By default, the program displays only file names.
• By default, the program lists the files in the current directory.
• The program must provide the... (2 Replies)
could i get any help with how to link this program together. i dont know what to put where the X's are
print `flush`;
thank(); #print thank header
use Getopt::Std; # use declaration with the options function
getopts("ld:") or usage() and exit; ... (3 Replies)
Long story short: I'm working inside of a Unix SSH under a bash shell. I have to code a C program that generates a random number. Then I have to call the compiled C program with a Perl program to run the C program 20 times and put all the generated random #s into a text file, then print that text... (1 Reply)
how would you exit out of a programm correctly, without having for the program to crash?
for example
print "Enter quit";
$input = <STDIN>;
if ($input eq "quit")
{
{QUIT THE PROGRAM}
}
else
{
print "invalid input";
}
one more thing, how do u exit a program "correctly", if... (3 Replies)
Hi
I am new to perl, i need to write a program to convert horizontal words to vertical
eg: cat, dog, cow,.....(text file)
this should be written as
1.cat
2.dog
like this. can u pls help me to work out.. (4 Replies)
hi,
i have posted the same kind of the question in some other forum of the same site. but realized that it is supposed to be here so i am reposting it .this is the perl script written to check for particular pattern.
my file 1 would look like this
hwk:678:9878:asd:09: abc cfgb 12 nmjk ......... (3 Replies)
can anyone help me out to write a code by connecting to the sql database and I need to print the list of tables present in the databse.
any ideas please. (1 Reply)
I created a program, so a kid can practice there math on it. It dispenses varies math problems and the kid must input an answer. I also want it to grade the work they have done, but I can't find the best place for it to print out the grade.
I have:
if ( $response =~ m/^/ ) {
$user_wants_to_quit... (1 Reply)
Discussion started by: germany1517
1 Replies
LEARN ABOUT DEBIAN
html::formfu::deflator::pathclassfile
HTML::FormFu::Deflator::PathClassFile(3pm) User Contributed Perl Documentation HTML::FormFu::Deflator::PathClassFile(3pm)NAME
HTML::FormFu::Deflator::PathClassFile - Deflator for Path::Class::File objects
SYNOPSIS
$form->deflator( PathClassFile => 'file' )
->relative( 'root' );
---
elements:
- type: Text
deflator:
- type: PathClassFile
relative: root
DESCRIPTION
Deflator for Path::Class::File objects.
There are three types of deflation:
relative
Set this to 1 to deflate to a relative path. Anything else than 1 specifies the directory to use as the base of relativity - otherwise
the current working directory will be used.
absolute
Set this to 1 to deflate to an absolute path. Anything else than 1 specifies the directory to use as the base of relativity - otherwise
the current working directory will be used.
basename
Set this to 1 to get the name of the file without the directory portion.
As you cannot set values for a File element, this deflator will only work on regular form elements.
AUTHOR
Moritz Onken, "onken@houseofdesign.de"
LICENSE
This library is free software, you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2012-01-23 HTML::FormFu::Deflator::PathClassFile(3pm)