The "@" symbol

trying to include the following code with the abc.pl script... the snippet works in an html/css environment print < @import url("theta.css"); @media print { body {background: white; color: black; font: 12pt Times, serif;} #noprnt {d

Re: The "@" symbol

A here document (like the one you wrote in your script between "< wrote: > trying to include the following code with the abc.pl script... > > the snippet works in an html/css environment > > print < > > @import url("theta.css"); > @media print { >

Re: The "@" symbol

On 1/13/06, Adriano Ferreira <[EMAIL PROTECTED]> wrote: > It is in core documentation somewhere, even though I could not locate > it right now. Here it is: try C in the section "Regexp Quote-Like Operators", search for the item

Re: The "@" symbol

On 1/13/06, Gerald Wheeler <[EMAIL PROTECTED]> wrote: > The "@" symbols are misread and thus this cause errors... escaping the > "@" symbols doesn't work It should work if you escape them correctly, which is to say with a preceding backslash. How did you escape them that didn't work? > print

Re: The "@" symbol

On Fri, 13 Jan 2006, Gerald Wheeler wrote: > trying to include the following code with the abc.pl script... > > the snippet works in an html/css environment > > print < > > @import url("theta.css"); > @media print { > body {background: white; co

RE: The "@" symbol

termination string to avoid accidental interpolation in your strings(E.g. <<'HERE' instead of <From perldoc perlop: print <mailto:[EMAIL PROTECTED] Sent: Friday, January 13, 2006 8:28 AM To: beginners@perl.org Subject: The "@" symbol trying to include the fo

checking for the @ symbol

i am writing a script that tests to see if an \@ symbol is entered by an end user. i am trying to look at other alternatives that a malicious end user might do to get around my checking. right now, i am doing a simple if ( $add_alias =~ /\@/ ) { could an end user enter an escaped ascii c

input with the < symbol

What happens if I call a perl script as follows: test.pl < abc What picks up the abc inside the script? In shell scripting I would just use a read statement (read a). Is there a like function in perl? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PRO

Manipulating the symbol table

One issue I've been dealing with is updating my modules with accessors, instead of my applications using the instance variables directly. In the mentioned perldoc, there are snips of code showing how to update the symbol table to reference a subroutine with the same name as each key in an obj

Re: checking for the @ symbol

At 11:08 PM 6/11/01 -0500, [EMAIL PROTECTED] wrote: >i am writing a script that tests to see if an \@ symbol is entered by an >end user. i am trying to look at other alternatives that a malicious end >user might do to get around my checking. right now, i am doing a simple > > if ( $add_al

Re: checking for the @ symbol

Sure, no problem. i am writing a "control panel" of sorts for individuals to use to administrate their virtual emails on a linux based sendmail server. each client has a file in /etc/mail/include that holds tab delimited entries for their email aliases: [EMAIL PROTECTED] [EMAIL PROTECTED] th

Re: checking for the @ symbol

At 09:29 12.06.2001 -0500, you wrote: >i am printing to the file currently via: > > open(FILE, ">>$filename"); > print FILE "$add_alias\@$domain\t$add_destination\n"; > close(FILE); > >so i am appending the appropriate domain to the new alias they are >entering. overall, i wan

Re: checking for the @ symbol

> print "You're cheating!" if($add_alias =~ /[^\w\.\-]/g); # \w Match a > "word" character (alphanumeric plus "_") > wow. thanks. that looks just like what i need. however, i also want to match the _ character as well. so will /[^\w\.\-\_]/ work for me?

Re: checking for the @ symbol

On 12 Jun 2001 10:24:23 -0500, [EMAIL PROTECTED] wrote: > > print "You're cheating!" if($add_alias =~ /[^\w\.\-]/g); # \w Match a > > "word" character (alphanumeric plus "_") > > > > wow. thanks. that looks just like what i need. however, i also > want to match the _ character as wel

Re: checking for the @ symbol

On Tue, 12 Jun 2001, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote, > > print "You're cheating!" if($add_alias =~ /[^\w\.\-]/g); # \w Match a > > "word" character (alphanumeric plus "_") > > > > wow. thanks. that looks just like what i need. however, i also > want to match the _ charac

Re: checking for the @ symbol

At 11:50 12.06.2001 -0400, Chas Owens wrote: >\w includes _. The \w character set is anything that can be included >in a variable name. On the topic of shortening the regexp: "." in a >character class does not need to be escaped so you can write it like >this > > print "You're cheating!" if($a

Re: input with the < symbol

Mike wrote: > > What happens if I call a perl script as follows: > > test.pl < abc The contents of the file "abc" are directed to the standard input of "test.pl" > What picks up the abc inside the script? In shell scripting I would just > use a read statement (read a). Is there a like funct

The > symbol in a variable

$? if system($runprog); Can anyone tell me what the > symbol means here: my $runprog = "$NexBase::idxBase/cmdfiles/$indexname > $cmdfile"; I have looked in O'Reilly's Programming Perl book and found lots of information about t

The > symbol in a variable

$? if system($runprog); Can anyone tell me what the > symbol means here: my $runprog = "$NexBase::idxBase/cmdfiles/$indexname > $cmdfile"; I have looked in O'Reilly's Programming Perl book and found lots of information about t

Re: Manipulating the symbol table

Steve Bertrand wrote: $user->{'username'} = 'steveb'; # in an app I could then replace it instead with: $user->username('steveb'); See also Class::Accessor::Faster and http://search.cpan.org/~spurkis/accessors/ -- Ruud -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additiona

a question on the symbol

Hello, my $obj; my $h; foreach $h (@{ref($hosts) ? $hosts : [$hosts]}) { $obj = $type->SUPER::new( PeerAddr => ($host = $h), PeerPort => $arg{Port} || 'smtp(25)', LocalAddr => $arg{LocalAddr}, LocalPort => $arg{LocalPort}, Proto => 'tcp', Timeout

Re: The > symbol in a variable

rog = "$NexBase::idxBase/cmdfiles/$indexname > $cmdfile"; > exit $? if system($runprog); > >Can anyone tell me what the > symbol means here: > >my $runprog = "$NexBase::idxBase/cmdfiles/$indexname > $cmdfile"; > >I have looked in O'Reilly's

Re: The > symbol in a variable

: > > # Create the cmdfile > my $runprog = "$NexBase::idxBase/cmdfiles/$indexname > $cmdfile"; > exit $? if system($runprog); > > Can anyone tell me what the > symbol means here: > > my $runprog = "$NexBase::idxBase/cmdfiles/$indexname > $cmdfil

Re: The > symbol in a variable

rog = "$NexBase::idxBase/cmdfiles/$indexname > $cmdfile"; > exit $? if system($runprog); > > Can anyone tell me what the > symbol means here: > > my $runprog = "$NexBase::idxBase/cmdfiles/$indexname > $cmdfile"; >

Re: a question on the symbol

On Sun, 13 Dec 2009 23:43:44 +0800, Xiao Lan (小兰) wrote: > Hello, > > my $obj; > > my $h; > foreach $h (@{ref($hosts) ? $hosts : [$hosts]}) { > $obj = $type->SUPER::new( > PeerAddr => ($host = $h), > PeerPort => $arg{Port} || 'smtp(25)', LocalAddr => > $arg{LocalAddr}