Learn PHP

Search This Blog

Print Last 5 String in Perl

Posted by Unknown on January 19, 2015

Get link
Facebook
Twitter
Pinterest
Email
Other Apps

my $str = 'I love India';
my $pstr = substr($str, -5);
print $pstr.'
';
----------------------------
O/P :-  India

Get link
Facebook
Twitter
Pinterest
Email
Other Apps

Comments

How to open Javascript window.open in new tab or different popup

function openFile(url,filename){ win = window.open(url,"DOCNAME"+filename,'_blank,width=800,height=600,scrollbars=yes,menubar=yes,status=yes,resizable=no,modal=yes,directories=false,location=false); win.focus(); } file.txt abc.txt

difference between Chop and Chomp Chop: 1) Chop removes any last character from string or line. 2) This removes last character of the string and return that character $str = "How Are You"; chop($str); print $str; #output 'How Are Yo' $str = "How Are You"; $newStr = chop($str); print $newStr; #output would be 'u' -------------------------- Chomp: 1) this removes any special character at the end of the line or string 2) It removes characters at the end of strings corresponding to the $INPUT_LINE_SEPARATOR ($/) 3) It return number of characters removed $str = "How Are You\n"; chomp($str); print $str; #output would be How Are You', it removed special newline char '\n' $a = "How Are You\n"; $b = chomp($a); print $b; #it would be returning 1, it did removed one character something for sure

Send http request using perl Using CURL and PHP

1) Send http request using perl Using CURL $jSONData = '{\"userId\": \"testuser@gmail.com\", \"pwd\": \"testPassword\" }'; $url = 'http://testingapi.com/v1/valUserCred'; my $curlCommand = "curl $url --header \"Accept: application/json\" --header \"Content-Type: application/json\" --header \"Access-Control-Allow-Origin: *\" --header \"Access-Control-Allow-Credentials: true\" --header \"Authorization: Basic $userKey\" --data \"".$jSONData."\""; print STDERR "$curlCommand\n"; my $result = qx/$curlCommand/; print STDERR Dumper($result); ---------------------------- 2) Send http request using perl my $url = 'http://testingapi.com/v1/valUserCred'; my $xml = <<"USER_XML"; <userid>testuser@gmail.com</userid> <segment>testPassword</segment&

Powered by Blogger

All rights resever for http://learnphp4mmanoj.blogspot.com

Print Last 5 String in Perl

Comments

Post a Comment