I have more than 1 files in the directory. In bash, I can use
Code:
cd /work
for x in `ls`
do
:
:
done
to run for each file in the directory.
How about in perl script?
Code:
filepath="ABC1"
open(FILE, $filepath) or die "$filepath cannot be opened.";
while(<FILE>) {
:
:
}
close(<file>)
because the open command just open the file ABC1 only. If I have ABC2, ABC3,ABC4 and ABC5 files.... how to let perl script also can run for the other files?
Thanks for you advise.
Last edited by pludi; 10-09-2009 at 03:18 AM..
Reason: code tags please...
I have a question regarding running perl in the current process.
I shall demonstrate with an example.
Look at this.
sh-2.05b$ pwd
/tmp
sh-2.05b$ cat test.sh
#! /bin/sh
cd /etc
sh-2.05b$ ./test.sh
sh-2.05b$ pwd
/tmp
sh-2.05b$ . ./test.sh
sh-2.05b$ pwd
/etc
sh-2.05b$
So... (10 Replies)
Hi all
Recently i had finished a perl script. When i run manually, the script work fine.
But when i wanted to put the script in cron, it didn't get the same output as it run manually. I felt that it only execute the script until certain line then it stop as i see most of the related files didn't... (6 Replies)
I have a local linux machine in which the files are dumped by a remote ubuntu server. If the process in remote server has any problem then empty files are created in local machine. Is there any way using perl script to check if the empty files are being created and delete them and then run a shell... (2 Replies)
Hello everyone,
I have two types of files in a directory:
*.txt
*.info
I have a perl script that uses these two files as arguments, and produces a result file:
perl myScript.pl abc.txt abc.xml
How can I run this script (in a "for" loop , looping through both types of files)... (4 Replies)
Hello
i want create perl script to connect remotely to another machine and run perl script
please note that the remote script check for different variables remotely and not located on local machine
also i want to know how to send interactive variables
i am trying to make script to... (2 Replies)
Hello,
I'm trying to run "csso" (minify css) in a CGI script from the web panel.
That is not working: Returns error 0;
my $cmd = qq`csso stylesheet.css > stylesheet.min.css`;
system($cmd);
But that is working:
my $cmd = qq`echo 'blabla' > stylesheet.min.css`;
system($cmd);
I'm... (12 Replies)
I have a VBA that creates a new directory folder and creates a new text file in that directory. I am trying to run a perl script from the VBA and have created a batch file that gets called from the VBA. That bat file uses a shell file to run a script. When the batch file is called I get the error... (0 Replies)
Linux System having all Perl, Python, PHP (and Ruby) installed
From a Shell script, can call a Perl, Python, PHP (or Ruby ?) file
eg
eg
a Shell script run in a case statement call to run a php file, also Perl or/and Python file???
Like
#!/usr/bin/bash
....
....
case $INPUT_STRING... (1 Reply)
Discussion started by: hoyanet
1 Replies
LEARN ABOUT DEBIAN
text::micromason::templatedir
MicroMason::TemplateDir(3pm) User Contributed Perl Documentation MicroMason::TemplateDir(3pm)NAME
Text::MicroMason::TemplateDir - Use Base Directory and Relative Paths
SYNOPSIS
Instead of using this class directly, pass its name to be mixed in:
use Text::MicroMason;
my $mason = Text::MicroMason->new( -TemplateDir, template_root=>'/foo' );
Use the standard compile and execute methods to parse and evalute templates:
print $mason->compile( file=>$filepath )->( 'name'=>'Dave' );
print $mason->execute( file=>$filepath, 'name'=>'Dave' );
Templates stored in files are looked up relative to the template root:
print $mason->execute( file=>"includes/greeting.msn", 'name'=>'Charles');
When including other files into a template you can use relative paths:
<& ../includes/greeting.msn, name => 'Alice' &>
DESCRIPTION
This module changes the resolution of files passed to compile() and execute() to be relative to a base directory path or to the currently
executing template.
Supported Attributes
template_root
Base directory from which to find templates.
strict_root
Optional directory beyond which not to read files. If set to 1, uses template_root, Causes read_file to croak if any filename outside
of the root is provided. (Note that this is not a chroot jail and only affects attempts to load a file as a template; for greater
security see the chroot() builtin and Text::MicroMason::Safe.)
Private Methods
prepare
Intercepts uses of file templates and applies the base-path adjustment.
read_file
Intercepts file access to check for strict_root.
EXCEPTIONS
The following additional exceptions are generated by Text::MicroMason::TemplateDir when appropriate:
o Text::MicroMason::TemplateDir: Strict root '%s' doesn't seem to exist
The strict_root directory (or template_root if strict_root is '1') doesn't seem to exist. Strict root checking uses Cwd's abs_path(),
and requires the strict_root directory to exist at the time the check is performed.
o Text::MicroMason::TemplatePath: Template '%s' not in required base path '%s'
The template found in the configured template path was not within the configured strict_root directory. This may be caused by
requesting an absolute template filename not within strict_root, or by specifying a strict_root which does not match the configured
template path.
SEE ALSO
For an overview of this templating framework, see Text::MicroMason.
This is a mixin class intended for use with Text::MicroMason::Base.
For distribution, installation, support, copyright and license information, see Text::MicroMason::Docs::ReadMe.
perl v5.10.1 2009-11-11 MicroMason::TemplateDir(3pm)