Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re^2: help need with flexlm

by vkknava (Initiate)
on May 04, 2013 at 13:16 UTC ( #1032039=note: print w/ replies, xml ) Need Help??


in reply to Re: help need with flexlm
in thread help need with flexlm

I need for each product. If a user uses 30% of the total number of a product, I need an email. I will try with what you have suggested and let you know with the result.


Comment on Re^2: help need with flexlm
Re^3: help need with flexlm
by vkknava (Initiate) on May 04, 2013 at 14:56 UTC

    I tried with the first half of the code. But it is not printing the number.

    Another thing is I have many products in the output file. I am calculating the usage of each product.

    #!/usr/bin/perl local $/; open(DAT, "output1.txt") || die("Could not open file!"); my $line = <DAT>; my $product; if ( $line =~ m/Users of/ ) { $line =~ m@Product(\d+):@; $product = $1; print $product; }

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1032039]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (8)
As of 2014-08-20 06:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (105 votes), past polls