Wrox Programmer Forums

Need to download code?

View our list of code downloads.

Go Back   Wrox Programmer Forums > Search Forums
Password Reminder
| FAQ | Members List | Calendar | Search | Today's Posts | Mark Forums Read
Welcome to the p2p.wrox.com Forums.

You are currently viewing the section of the Wrox Programmer to Programmer discussions. This is a community of tens of thousands of software programmers and website developers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining today you can post your own programming questions, respond to other developers’ questions, and eliminate the ads that are displayed to guests. Registration is fast, simple and absolutely free .
DRM-free e-books 300x50
Showing results 1 to 2 of 2
Search took 0.01 seconds.
Search: Posts Made By: anuragamodi
Forum: Perl May 28th, 2010, 09:51 AM
Replies: 2
Views: 1,738
Posted By anuragamodi

use warnings;

my $inVar = " abc123 | 345 def ";


foreach (@arr)
$_ =~ s/^[\s]* (.+\S) [\s]*$/$1/g;
Forum: Perl May 27th, 2010, 12:46 AM
Replies: 18
Views: 132,403
Posted By anuragamodi
Thumbs up Solution!!!

use strict;
use warnings;

print "First Argument: $ARGV[0]";
print "\n********************\n";
print "Second Argument: $ARGV[1]";

and i save the code in a file test.pl

Try & execute this...
Showing results 1 to 2 of 2


All times are GMT -4. The time now is 11:37 AM.

Powered by vBulletin®
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.