Perl 6 Forum RSS Feed (Replies Included)

Re: External variable

Thu, 07 May 2009 08:44:22 -0700

They're just in the @ARGV array, so:

print $ARGV[0];

Will print the first one for example.

Jonathan
###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");

Re: External variable

Wed, 06 May 2009 06:07:31 -0700

Do you mean how to work with command line arguments which were used when calling your perl script?
If so...

- Input Parameters:
- This example shows how to call "PERL Console Application" with input parameters and read them from the code.
- Create C:\Temp\Test.pl – Start MSDOS – cd C:\Temp – perl Test.pl arg1 arg2 arg3

Test.pl
for($i=0;$i<=$#ARGV;$i++) { print("$ARGV[$i]\n"); }

External variable

Fri, 01 May 2009 02:31:39 -0700

Hello ,

I want to know how to use a external var like

#perl script.pl var1 var2

and how to use/define var1 and var2 in script.pl

like $1 $2 in msdos

Have a nice day

External variable

Fri, 01 May 2009 02:30:45 -0700

Hello ,

I want to know how to use a external var like

#perl script.pl var1 var2

and how to use/define var1 and var2 in script.pl

like $1 $2 in msdos

Have a nice day

Re: Programme arguments

Sun, 20 Apr 2008 11:41:25 -0700

: Hi there,
:
: I am wondering if it is possible to gather information regarding a
: programme that must be executed via perl, regarding the programmes
: arguments. I want to automate the execution of a different
: programmes but want to query which arguments are necessary
: beforehand, so I know how many parameters to include.
:
: I look forward to hearing from you.
: s.
:
The easiest way is to check the program's documentation or help files. Trying to get the the number and type of the command line options using an automated program (in any language) is quite tricky if not impossible.

Programme arguments

Sun, 20 Apr 2008 11:17:08 -0700

Hi there,

I am wondering if it is possible to gather information regarding a programme that must be executed via perl, regarding the programmes arguments. I want to automate the execution of a different programmes but want to query which arguments are necessary beforehand, so I know how many parameters to include.

I look forward to hearing from you.
s.

Re: Welcome to the Perl 6 message board!

Wed, 04 Jul 2007 03:51:50 -0700

: How is Perl 6 different than Perl 5.8.8?
It's essentially a new language, re-implemented from the ground up. It's not source-compatible with Perl 5, though it will be possible to use Perl 5 modules from Perl 6 code, and there will be an automated source translator too. There are many improvements and new features. See the Perl 6 FAQ here at PH for more info:
http://www.programmersheaven.com/2/Perl6-FAQ

Jonathan
###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");

Re: Welcome to the Perl 6 message board!

Tue, 03 Jul 2007 12:34:19 -0700

: Hi,
:
: Here at Programmer's Heaven we like to keep up with the latest
: stuff. One of my areas of interest is in programming language design
: and semantics, so covering new languages or updates to languages is
: always great fun for me.
:
: Perl 6 is on its way and looks like being well worth the wait. We'll
: be introducing content relating to Perl 6 on Programmer's Heaven
: over the coming weeks and months and (hopefully!) years, and this
: forum provides a place to discuss the new language.
:
: Have fun!
:
: Jonathan
: Programmer's Heaven
:
:
: ###
: for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
: (tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
: /(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");
:
How is Perl 6 different than Perl 5.8.8?
Thanks and Regards,
JoeMc

Re: to enter a phone no

Tue, 03 Jul 2007 12:30:37 -0700

: hi
: i want to get a errror message if i enter a string value instead
: of integer in a text field
: can anybody plz help me
:
Here's a couple different approaches:

sub check_area_code {
    my $file = "/path/error.log"
    my $LOGOUT = FileHandle->new(">> ${file}") or die ("Can not write to ${file}: $!");
    my $len = do { length $area_code };

    if ( $len == 3 && ( $area_code =~ /[0-9][0-9][0-9]/ ) && (! ($area_code =~ /911/ )) ) {
         # do something...
    } else {
         print $LOGOUT "error invalid area code in phone number!\n";
    }
    $LOGOUT->close();
}

OR Have you tried setting up a condition like such and send in one char at a time:

if (! ($passed_var =~ /\d/) ) {

    print "passed_var is not a number!\n";
    # you could either print this to an error log file or to STDERR.
    # not sure what you wanted from here on. ?
    # or maybe set a variable to 0 and use it like a flag of some sorts.

} else {

    print "All is ok, we have a number.\n";
}

Hope that helps.
Regards,
JoeMc

to enter a phone no

Sat, 26 May 2007 03:02:52 -0700

hi
i want to get a errror message if i enter a string value instead of integer in a text field
can anybody plz help me

Re: Perl 6 regexes via Pugs

Wed, 29 Nov 2006 04:00:59 -0700

Hi,

: I am trying to learn Perl 6 regexes via Pugs. I have the current
: win32 binary build (which includes a parrot.exe) available from the
: pugscode.org .
:
I fear, that's the one that I produce.

: I get a parsing error on the pattern of any Perl 6 regex example I try
: and I think it maybe because Parrot is not being embedded or
: externally linked properly into the pugs.exe. Are there some
: environment variables or pugs environment commands I need to effect to
: get parrot to get asked to parse for pugs?
:
: The error I get for perl 6 regexes (eg. for an example:
:
: $string= "abacadabra";
:
: $string ~~ m/a(.*)a/; ) is
:
: *** Cannot parse PGE: a(.*)a
:
: It doesn't make any difference whether the pattern is a(.*)a or
: something simpler or more complex - pugs can't parse the regex pattern
: whatever it is.
:
They actually don't use PGE any more, but switched to using PCR, and are embedding Perl 5. I think that my build was then missing some files needed to use regexes. I'm currently working on a fix for that - I'll get the new release up soon.

: By the way, if there's some OTHER way than win32 binary-build pugs.exe
: to try out perl 6 regexes I would be very grateful for that just as
: well.
You can always download Parrot and play with PGE directly, but the easy way is to use runpugs:

http://feather.perl6.nl:8080/cgi-bin/runpugs?

Have fun,

Jonathan

###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");

Perl 6 regexes via Pugs

Thu, 23 Nov 2006 12:25:19 -0700

Dear Jonathan,

I am trying to learn Perl 6 regexes via Pugs. I have the current win32 binary build (which includes a parrot.exe) available from the pugscode.org .

I get a parsing error on the pattern of any Perl 6 regex example I try and I think it maybe because Parrot is not being embedded or externally linked properly into the pugs.exe. Are there some environment variables or pugs environment commands I need to effect to get parrot to get asked to parse for pugs?

The error I get for perl 6 regexes (eg. for an example:

$string= "abacadabra";

$string ~~ m/a(.*)a/; ) is

*** Cannot parse PGE: a(.*)a

It doesn't make any difference whether the pattern is a(.*)a or something simpler or more complex - pugs can't parse the regex pattern whatever it is.

By the way, if there's some OTHER way than win32 binary-build pugs.exe to try out perl 6 regexes I would be very grateful for that just as well.

Thank you,

Peter Schwenn

Re: about perl6

Mon, 06 Nov 2006 05:25:38 -0700

Hi,

: what does this perl6 means
Perl 6 is the next version of the Perl programming language, which is currently at Perl 5 (well, the 5.8 branch more accurately). It is a ground-up re-write of Perl 5.

: and what is basic platform of this language
Perl 6 itself is just a specification for the language, then there is more than one implementation of that language under way. The most advanced is the Pugs project, which implements much of the Perl 6 specification. This is written in Haskell, but they are working on porting it to Perl 6 so the compiler is self hosting. There is also work to compile Perl 6 down to Perl 5. Another implementation that in theory should perform best is the Parrot virtual machine, but that's a bit behind Pugs at the moment.

: and what type of task will it perform and how will it be helpful for
: programmers in future?
Perl 6 will be suitable for many types of programming task - in fact, more than Perl 5 (it will be easier to build and maintain larger systems, and type annotations will allow you to supply more optimization hints, meaning you can write code that may run much more quickly).

And of course, it's still Perl, which is nearly "too useful not to know".

Jonathan

###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");

about perl6

Sat, 04 Nov 2006 06:09:03 -0700

what does this perl6 means and what is basic platform of this language and what type of task will it perform and how will it be helpful for programmers in future?please reply me back for my questions

hi, please give us some adivce and idea about our project

Wed, 01 Nov 2006 01:06:02 -0700

Hi, we just finish a project about a net shopping community at http://netshopkey.com please visit us and give us some feedback, idea and advice. Very thankful

Automatic html doc conversion to pdf

Mon, 30 Oct 2006 18:09:17 -0700

Hi,

I need to get the following done:

I run a website, which once the reservation has been made (car hire reservations), the client can see his voucher online, shown in a html page.
Now, instead of the html page, would like to get it as pdf document delivered.
How can this be done?
Also, would like that DB automatically creates the voucher in pdf format and sends it by email to client.

Any solutions on this?
Thanks

Bagging, Boosting

Thu, 19 Oct 2006 00:59:42 -0700

Anybody who can share me Bagging, Boosting or AdaBoost codes?

Please help! Thanks!

Perl 6 FAQ Launched!

Wed, 11 Oct 2006 03:00:10 -0700

Hi,

Today Programmer's Heaven has launched a Perl 6 FAQ, answering over 115 questions about Perl 6.

http://www.programmersheaven.com/2/Perl6-FAQ

There's also a step-by-step guide to writing and running your first Perl 6 program (if you've never written and run one before, of course ).

http://www.programmersheaven.com/2/Perl6-QuickStart

All feedback, comments and questions welcome on this forum.

Enjoy,

Jonathan
Programmer's Heaven

###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");

Welcome to the Perl 6 message board!

Thu, 05 Oct 2006 05:43:21 -0700

Hi,

Here at Programmer's Heaven we like to keep up with the latest stuff. One of my areas of interest is in programming language design and semantics, so covering new languages or updates to languages is always great fun for me.

Perl 6 is on its way and looks like being well worth the wait. We'll be introducing content relating to Perl 6 on Programmer's Heaven over the coming weeks and months and (hopefully!) years, and this forum provides a place to discuss the new language.

Have fun!

Jonathan
Programmer's Heaven

###
for(74,117,115,116){$::a.=chr};(($_.='qwertyui')&&
(tr/yuiqwert/her anot/))for($::b);for($::c){$_.=$^X;
/(p.{2}l)/;$_=$1}$::b=~/(..)$/;print("$::a$::b $::c hack$1.");