Probably I am not seeing it or I am not using the "delete" correctly I had the following codes but it does not work for me
#!/bin/perl -w
...
@sysFile1 = (a_b, a_c, a_d);
@sysFile2 = (a_c, a_e, b_f);
foreach $line1 (@sysFile1){
trim(\$line1);
(my $tmp1, my $tmp2) = split/_/,... (6 Replies)
Hello guys,
I have the following question.
Consider the following code in PERL
for($xeAnumber=0; $xeAnumber<@xeAnumber; $xeAnumber++)
{
if(@xeAnumber==@final_file)
{
@final_file=@xeTimeStamp;
}... (3 Replies)
Example - Script to find the index of a month from array
MONTHS="Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec"
set -A MON $MONTHS
A="Sun May 23 09:34:30 GMT 2010"
getMonth=`echo $A|cut -c5-7` ##getMonth=May
Arrayindex_in_MONTHS_array= ???? # { 0,1,2,3,4 } - at fifth place
... (7 Replies)
Greetings,
DISCLAIMER: My shell scripting is rusty so my question may be borderline stupid. You've been warned.
I need to create a script that a) lists the content of zip files in a directory and b) sends out an `exception` report. My ZIP files contain a control file (for load check). I want... (2 Replies)
I need to remove an element from the below array variable TABLENAME.
#!/bin/ksh
set -A TABLENAME "mirf roxar keke mirs"
echo "the array is ${TABLENAME}"
If i need to remove say keke and have the final TABLENAME as below, how this could be achieved. Pls throw some light.
echo "Modified... (3 Replies)
Hello,
I want to run one (not multiple) action if an element doesn't exist in array.
for example:
@array = (1..10);
foreach $el (@array)
{
if ($el != 11)
{
print "number not found\n";
}
}
the output of this simple script:
number not found (3 Replies)
Hi, How to get previous/next element in the array perl
Example
@queue = (1, 2 ,3 , 4);
I want to get value of 1 and 2, or, 2 and 3, or 3 and 4...etc and compare to value which one is greater to do that I need to get previous and next element of array ? (1 Reply)
I am trying to take all the elements of an array and multiply them by 2, and then copy them to a new array. Here is what I have
i=0
for true in DMGLIST
do
let DMGSIZES2="${DMGSIZES}"*2
let i++
done
unset i
echo ${DMGSIZES2}
It does the calculation correctly for the first element,... (7 Replies)
This question is for someone that's more familiar with Array Element.
I need to know if the maximum array element that can be assigned is 1024 and if its so, Is there a workaround solution when the counter exceeded 1024?
param_array="$param_nam"
counter=$counter+1
#to avoid space... (3 Replies)
Hello,
I want to see if element exists in array, if so then, check it's corresponding value.
Column 4 is position and column 1 is the chromosome for it. There are duplicates for one position on one chromosome.
I want to check if same position exists on different chromosome:
Data... (8 Replies)
Discussion started by: genome
8 Replies
LEARN ABOUT CENTOS
purple
Purple(3) User Contributed Perl Documentation Purple(3)NAME
Purple - Perl extension to the libpurple instant messenger library.
SYNOPSIS
use Purple;
ABSTRACT
This module provides the interface for using perl scripts as plugins
in libpurple.
DESCRIPTION
This module provides the interface for using perl scripts as plugins in Purple. With this, developers can write perl scripts that can be
loaded in Purple as plugins. The scripts can interact with IMs, chats, accounts, the buddy list, libpurple signals, and more.
The API for the perl interface is very similar to that of the Purple C API, which can be viewed at http://developer.pidgin.im/doxygen/ or
in the header files in the Purple source tree.
FUNCTIONS
@accounts = Purple::accounts
Returns a list of all accounts, online or offline.
@chats = Purple::chats
Returns a list of all chats currently open.
@connections = Purple::connections
Returns a list of all active connections.
@conversations = Purple::conversations
Returns a list of all conversations, both IM and chat, currently open.
@conv_windows = Purple::conv_windows
Returns a list of all conversation windows currently open.
@ims = Purple::ims
Returns a list of all instant messages currently open.
SEE ALSO
Purple C API documentation - http://developer.pidgin.im/doxygen/
Purple website - http://pidgin.im/
AUTHOR
Christian Hammond, <chipx86@gnupdate.org>
COPYRIGHT AND LICENSE
Copyright 2003 by Christian Hammond
This library is free software; you can redistribute it and/or modify it under the terms of the General Public License (GPL). For more
information, see http://www.fsf.org/licenses/gpl.txt
perl v5.16.3 2013-02-11 Purple(3)