04-18-2013
Hi friends, is there any one to help me in perl scripting for the above?
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
I need to extract the date part from the file name (20080221 in this ex) and compare it with the current date and delete it, if it is a past date.
$file = exp_ABCD4_T-2584780_upto_20080221.dmp.Z
really appreciate any help.
thanks
mkneni (4 Replies)
Discussion started by: MKNENI
4 Replies
2. UNIX for Dummies Questions & Answers
can anyone please suggest me on ideas to write a script which has to go back to 100 days from 'current date' and print the date of each day starting from 100th day to current day. (korn shell please)
Thanks
Pavan (5 Replies)
Discussion started by: pavan_test
5 Replies
3. Shell Programming and Scripting
Hi,
I have start date and end date in the following format. I need to check the current date is greater than the start date and less than the end date. if i use the command date --date "Tue 6:00 AM", it takes next Tues day not the current week's Tues day. Is there a way to get the current Tues... (9 Replies)
Discussion started by: bharathappriyan
9 Replies
4. UNIX and Linux Applications
Hi
I have a table with name, date in format DD.MM.YYYY.
I need to something like this (I try to explain in pseudo code)
if SYSDATE (current date) minus 6 months > $expiry date
print OK
else print NOK with $name and $expiry date
I know this is possible with Oracle. How to do this... (0 Replies)
Discussion started by: slashdotweenie
0 Replies
5. Shell Programming and Scripting
i would like to know how to append current date in a filename with .tgz extension.
#!/usr/bin/perl
my $date = `date + %Y%m%d`;
system("sudo mv /tmp/nyucs01_config_backup.tgz /misc/nyucs01_config_backup_$date.tgz");
im getting this error message:
sh: line 1: .tgz: command not found (7 Replies)
Discussion started by: linuxgeek
7 Replies
6. Shell Programming and Scripting
Hi All,
Want to get all dates and Julian week number for that date between the start date and end date. How can I achive this using perl?
(To achive above functionality, I was connecting to the database from DB server. Need to execute the same script in application server, since databse... (6 Replies)
Discussion started by: Nagaraja Akkiva
6 Replies
7. UNIX for Dummies Questions & Answers
Hi,
I am new to unix and I am stuck on how to compare two .zip file with date stamp in my directory. I need to compare out of the two file which is oldest to current date and unzip it after that done continue to unzip the second zip file.
Thanks for your help. (5 Replies)
Discussion started by: lilvi3tboix1
5 Replies
8. UNIX for Dummies Questions & Answers
Hi Guys,
Anyone who knows how to compare the current date with the a file containing a date, say for example I have a file that looks like this:
Command was launched from partition 0.
------------------------------------------------
Executing command in server server6
Fri Dec 16... (7 Replies)
Discussion started by: rymnd_12345
7 Replies
9. Shell Programming and Scripting
$beginDate = substr(DateCalc("today", "-7Days"),0,8);
This fetches the date 7 days back
Can I fetch the date before 7 years from todays date in Perl using same syntax
Use code tags, see PM. (3 Replies)
Discussion started by: parthmittal2007
3 Replies
10. Shell Programming and Scripting
I have a requirement as follows.
when i pass a date to the perl script, it has to calculate the current date - 8 months and output the date back to the shell script in date format (YYYY-MM-DD).
Current date - 8 months is not constant.. because leap year, and the months jan, mar, may,.... has... (4 Replies)
Discussion started by: kmanivan82
4 Replies
LEARN ABOUT DEBIAN
www::facebook::api::friends
WWW::Facebook::API::Friends(3pm) User Contributed Perl Documentation WWW::Facebook::API::Friends(3pm)
NAME
WWW::Facebook::API::Friends - Facebook Friends
SYNOPSIS
use WWW::Facebook::API;
DESCRIPTION
Methods for accessing friends with WWW::Facebook::API
SUBROUTINES
/METHODS
base
Returns the WWW::Facebook::API base object.
new Constructor.
get(flid => 'id')
The friends.get method of the Facebook API:
$response = $client->friends->get();
$response = $client->friends->get(flid => '23432');
get_app_users()
The friends.getAppUsers method of the Facebook API:
$response = $client->friends->get_app_users;
are_friends( uids1 => [ ... ], uids2 => [ ... ] )
The friends.areFriends method of the Facebook API. The two arguments are array refs that make up an associative array:
$response
= $client->friends->are_friends( uids1 => [1,7,8], uids2 => [2,3,4] );
See the Facebook API Documentation for more information.
get_lists()
The friends.getLists method of the Facebook API:
$response = $client->friends->get_lists;
get_mutual_friends( %params )
The friends.getMutualFriends method of the Facebook API:
$response = $client->friends->get_mutual_friends(
target_uid => $target_uid,
source_uid => $source_uid,
);
DIAGNOSTICS
None.
CONFIGURATION AND ENVIRONMENT
WWW::Facebook::API::Friends requires no configuration files or environment variables.
DEPENDENCIES
See WWW::Facebook::API
INCOMPATIBILITIES
None reported.
BUGS AND LIMITATIONS
No bugs have been reported.
Please report any bugs or feature requests to "bug-www-facebook-api@rt.cpan.org", or through the web interface at <http://rt.cpan.org>.
AUTHOR
David Romano "<unobe@cpan.org>"
LICENSE AND COPYRIGHT
Copyright (c) 2007-2010, David Romano "<unobe@cpan.org>". All rights reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. See perlartistic.
DISCLAIMER OF WARRANTY
BECAUSE THIS SOFTWARE IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE SOFTWARE, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT
WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE SOFTWARE "AS IS" WITHOUT WARRANTY OF ANY KIND,
EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE SOFTWARE IS WITH YOU. SHOULD THE SOFTWARE PROVE DEFECTIVE, YOU ASSUME THE COST OF
ALL NECESSARY SERVICING, REPAIR, OR CORRECTION.
IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
REDISTRIBUTE THE SOFTWARE AS PERMITTED BY THE ABOVE LICENSE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL, OR
CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE SOFTWARE (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING
RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE SOFTWARE TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF
SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
perl v5.10.1 2010-03-13 WWW::Facebook::API::Friends(3pm)