How can i print the output of a perl script on a unix console and redirect the same in a log file under same directory simultaneously ?
Like in Shell script, we use tee, is there anything in Perl or any other option ? (2 Replies)
Hi experts,
Sorry if it is repeated query.
I have folder that contains many files & folders. But I need to get the list of folders with the following format "1.0.0.0.003X", 1.0.0.0.004X..and so on. How do I get the same using perl?
I have this script which will do the listing.
$dir... (1 Reply)
Hi, I want to list all file that match user input ( specified shell wildcard) but when I compile it dont list me
#!/usr/bin/perl -w
print "Enter Advance Search Function: ";
chomp ($func = <STDIN>);
my @files = glob("$func");
foreach my $file (@files)
{
print "$file\n";... (1 Reply)
Hi Folks
I am very much a newbie at perl but picking it up and I'm hoping you can help.
I have a file input that details all the /etc/group files in our enterprise in the following format: "<host>:<group>:<gid>:<users>"
I want to parse this data display it as the following:... (9 Replies)
I am currently trying to find all files with extensions .gif .jpg .png .wav and .au in a current directory and count them.
I am trying to count them based on there extension only.
#!/usr/bin/perl
$gif =`ls *.gif | uniq -cf 1`;
$jpg =`ls *.jpg | uniq -cf 1`;
$png =`ls *.png | uniq -cf 1`;... (2 Replies)
I have been struggling to grep a file of NGrams (basically clusters of consonants or Consonant and Vowel) acting as a pattern file from an Input file which contains a long list of words, one word per line. The script would do two things:
Firstly read a text pattern from a large file of such... (5 Replies)
Hi friends,
i need to prepare a script ( in perl)
i have a file called "demo.exe" in my local unix host.
i have a list of remote hosts in a file "hosts.txt"
now i need to push "demo.exe" file to all the hosts in "hosts.txt" file.
for this i need to prepare a script(in perl, but shell... (5 Replies)
Hi All
i need to write something in perl that on a mac list all the users accounts, and then carries out a copy, ( rsync ) on each one it finds.
i was going to use glob, but i want to exclude a certain result here is what i have
use Getopt::Std;
use POSIX qw(tmpnam);
use lib... (1 Reply)
Discussion started by: ab52
1 Replies
LEARN ABOUT OSX
xml::xpath::nodeset5.16
XPath::NodeSet(3) User Contributed Perl Documentation XPath::NodeSet(3)NAME
XML::XPath::NodeSet - a list of XML document nodes
DESCRIPTION
An XML::XPath::NodeSet object contains an ordered list of nodes. The nodes each take the same format as described in XML::XPath::XMLParser.
SYNOPSIS
my $results = $xp->find('//someelement');
if (!$results->isa('XML::XPath::NodeSet')) {
print "Found $results
";
exit;
}
foreach my $context ($results->get_nodelist) {
my $newresults = $xp->find('./other/element', $context);
...
}
API
new()
You will almost never have to create a new NodeSet object, as it is all done for you by XPath.
get_nodelist()
Returns a list of nodes. See XML::XPath::XMLParser for the format of the nodes.
string_value()
Returns the string-value of the first node in the list. See the XPath specification for what "string-value" means.
to_literal()
Returns the concatenation of all the string-values of all the nodes in the list.
get_node($pos)
Returns the node at $pos. The node position in XPath is based at 1, not 0.
size()
Returns the number of nodes in the NodeSet.
pop()
Equivalent to perl's pop function.
push(@nodes)
Equivalent to perl's push function.
append($nodeset)
Given a nodeset, appends the list of nodes in $nodeset to the end of the current list.
shift()
Equivalent to perl's shift function.
unshift(@nodes)
Equivalent to perl's unshift function.
prepend($nodeset)
Given a nodeset, prepends the list of nodes in $nodeset to the front of the current list.
perl v5.16.2 2002-09-02 XPath::NodeSet(3)