trapd...@trapd00r.se writes:
> And if you want to work with 256 colors (note that not all terminals support
> this, and it should be avoided if it's not for your own use) you can do
> something like this:
>
>
> my @colors;
> for(my $i=0;$i<256;$i++) {
> push(@colors, "\033[38;5;$i".'m');
> }
> p
On Fri, May 28, 2010 at 14:46, Uri Guttman wrote:
>> "CO" == Chas Owens writes:
>
> CO> On Fri, May 28, 2010 at 12:44, Uri Guttman wrote:
>
> >> the negated char class is usually faster than most similar methods. i
> >> just like it as it says what i really want - a string without any - c
> "CO" == Chas Owens writes:
CO> On Fri, May 28, 2010 at 12:44, Uri Guttman wrote:
>> the negated char class is usually faster than most similar methods. i
>> just like it as it says what i really want - a string without any - chars.
>> also anchoring helps too in saying this string
On May 28, 2010, at 9:33 AM, Paul Johnson wrote:
> On Fri, May 28, 2010 at 06:14:38AM -0400, John Scoles wrote:
>
>> You will have to set those values before your modules load.
>>
>> So you should stick them in the BEGIN and that should work
>
> ... except where it doesn't, such as on Solaris
On Fri, May 28, 2010 at 12:44, Uri Guttman wrote:
>> "CO" == Chas Owens writes:
>
> CO> On Fri, May 28, 2010 at 01:05, Uri Guttman wrote:
> CO> snip
> >> $foo = $string =~ /^([^-])+-/ ? $1 : '' ;
> >>
> >> that will grab something from the start to the first - and grab it. if
>
> "CO" == Chas Owens writes:
CO> On Fri, May 28, 2010 at 01:05, Uri Guttman wrote:
CO> snip
>> $foo = $string =~ /^([^-])+-/ ? $1 : '' ;
>>
>> that will grab something from the start to the first - and grab it. if
>> it matched it will assign it to $foo, otherwise assign
On Fri, May 28, 2010 at 06:14:38AM -0400, John Scoles wrote:
> You will have to set those values before your modules load.
>
> So you should stick them in the BEGIN and that should work
... except where it doesn't, such as on Solaris for example. Here,
LD_LIBRARY_PATH (at least) really does nee
On Thu, May 27, 2010 at 04:51:45PM -0700, Bob Sadri wrote:
> Hi
> I have a perl script that calls a csh script. The csh script sources some
> environment variables (among others). When the control comes back to my
> perl script I like to use the environment variables set in the csh script.
> How
On Fri, May 28, 2010 at 02:53, newbie01 perl wrote:
> Hi all,
>
> Just need to confirm if this is the expected behaviour when setting
> PERL5LIB.
>
> If I have the folllowing in my script ...
snip
> #!/usr/bin/perl
>
> $ENV{PERL5LIB}="/oracle/product/db/11.1/perl/lib/site_perl/5.8.3/x86_64-linux-t
On Fri, May 28, 2010 at 01:05, Uri Guttman wrote:
snip
> $foo = $string =~ /^([^-])+-/ ? $1 : '' ;
>
> that will grab something from the start to the first - and grab it. if
> it matched it will assign it to $foo, otherwise assign ''. (and '' is
> called the null string, not null. perl has
You will have to set those values before your modules load.
So you should stick them in the BEGIN and that should work
http://www.compuspec.net/reference/language/perl/BEGIN_and_END.shtml
cheers
John Scoles
On Fri, May 28, 2010 at 3:45 AM, newbie01 perl wrote:
> Hi all,
>
> Can someone advise
Hi,
Steve Bertrand asked:
> Is there a POD system that can be used exclusively for 'developer'
> documentation? Can I make devel docs 'hidden' from the rest of the POD?
>
> If not, can you recommend a decent practice that I can weave into my
> current documentation methodology so that people can
On 10-05-28 02:53 AM, newbie01 perl wrote:
If this the case, does that mean I should be using use lib instead
of
$ENV{PERL5LIB}="/oracle/product/db/11.1/perl/lib/site_perl/5.8.3/x86_64-linux-thread-multi"?
Definitely yes. This statement is executed at run time. Modules are
loaded at compile
On Thu, May 27, 2010 at 6:22 PM, Harry Putnam wrote:
> I wondered if anyone could steer me to some information about making
> perl script output appear in color highlight on stdout.
>
> Something like what modern grep does on linux, where the searched term
> appears in some color (red) in the outp
On 27/05/10 22:16 -0500, Bryan Harris wrote:
my $e = "\033[0m";
my %cc = (
white => "\033[1;37m",
ltgray => "\033[0;37m",
gray => "\033[1;30m",
black => "\033[0;30m",
red => "\033[0;31m",
ltred => "\033[1;31m",
green => "\033[0;32m",
l
On Thu, May 27, 2010 at 8:37 PM, Steve Bertrand wrote:
> Is there a POD system that can be used exclusively for 'developer'
> documentation? Can I make devel docs 'hidden' from the rest of the POD?
>
> If not, can you recommend a decent practice that I can weave into my
> current documentation met
Try this
> I wondered if anyone could steer me to some information about making
> perl script output appear in color highlight on stdout.
>
> Something like what modern grep does on linux, where the searched term
> appears in some color (red) in the output to tty.
>
>
Try this code snippet
On May 27, 11:09 am, robertmorales...@gmail.com (Robert Morales)
wrote:
> Ok, now I added the:
>
> my $regex = "^((?!total).)*\$";
>
Using the 'qr' operator is a more efficient option
(see "Regexp Quote-Like Operators " in perlop)
and will take care of the $:
my $regex = qr/^((?!total).)*$
Hi,
I am running into problems with the SVG::TT::Graph::TimeSeries module.
My script is looping through data sets and generating graphs from different
datasets. Every second time I go though the loop, I get an error.
I stripped my script down to this demo code that illustrates the problem:
#!/u
On Friday 28 May 2010 10:45:14 newbie01 perl wrote:
> Hi all,
>
> Can someone advise how to set LD_LIBRARY_PATH from within the Perl scripts?
>
> If I set LD_LIBRARY_PATH from the command line, all is okay
>
> [oracle ~]$ perl -e 'use DBD::Oracle; print $DBD::Oracle::VERSION,"\n";'
> Can't load
Hi all,
Can someone advise how to set LD_LIBRARY_PATH from within the Perl scripts?
If I set LD_LIBRARY_PATH from the command line, all is okay
[oracle ~]$ perl -e 'use DBD::Oracle; print $DBD::Oracle::VERSION,"\n";'
Can't load
'/oracle/product/db/11.1/perl/lib/site_perl/5.8.3/x86_64-linux-threa
21 matches
Mail list logo