Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re^3: help need with flexlm

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


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

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://1032048]
help
Chatterbox?
[Discipulus]: c'mon bro' 20 begincheck and you are ok..

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (10)
As of 2017-10-16 22:31 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My fridge is mostly full of:

















    Results (217 votes). Check out past polls.

    Notices?