comment on

Hi, I am a perl beginner. I have an output like below. I need to get an email if first field (USER1 or USER2) uses 30% of Total licenses issued.

Users of PRODUCT1:  (Total of 10 licenses issued;  Total of 9 licenses
+ in use)

  "PRODUCT1" v2013.03, vendor: snpslmd
  floating license

    USER1 host1 /dev/tty (v2011.03) (flexlmhost/1011 130759), start Fr
+i 5/3 18:55
    USER1 host1 /dev/tty (v2011.03) (flexlmhost/1011 96878), start Fri
+ 5/3 18:55
    USER1 host2 /dev/tty (v2011.03) (flexlmhost/1011 42805), start Fri
+ 5/3 19:03
    USER1 host3 /dev/tty (v2011.03) (flexlmhost/1011 38101), start Tue
+ 4/30 22:01
    USER1 host3 /dev/tty (v2011.03) (flexlmhost/1011 56246), start Fri
+ 5/3 15:34
    USER1 host3 /dev/tty (v2011.03) (flexlmhost/1011 134276), start Th
+u 5/2 19:10
    USER2 host4 /dev/tty (v2010.06) (flexlmhost/1011 29632), start Fri
+ 5/3 18:38
    USER2 host4 /dev/tty (v2010.06) (flexlmhost/1011 29632), start Fri
+ 5/3 18:38
    USER2 host4 /dev/tty (v2010.06) (flexlmhost/1011 29632), start Fri
+ 5/3 18:38

Users of PRODUCT2:  (Total of 10 licenses issued;  Total of 9 licenses
+ in use)

  "PRODUCT2" v2013.03, vendor: snpslmd
  floating license

    USER2 host5 /dev/tty (v2010.06) (flexlmhost/1011 18701), start Tue
+ 4/30 22:01
    USER2 host6 /dev/tty (v2010.06) (flexlmhost/1011 40601), start Tue
+ 4/30 22:01
    USER2 host7 /dev/tty (v2010.06) (flexlmhost/1011 15041), start Wed
+ 5/1 14:17
    USER2 host8 /dev/tty (v2010.06) (flexlmhost/1011 9801), start Tue 
+4/30 22:01
    USER2 host7 /dev/tty (v2010.06) (flexlmhost/1011 57099), start Fri
+ 5/3 18:23
    USER2 host3 /dev/tty (v2010.06) (flexlmhost/1011 119742), start Fr
+i 5/3 18:27
    USER2 host2 /dev/tty (v2010.06) (flexlmhost/1011 126337), start Fr
+i 5/3 18:27
    USER2 host1 /dev/tty (v2010.06) (flexlmhost/1011 126190), start Fr
+i 5/3 18:27
    USER2 host4 /dev/tty (v2010.06) (flexlmhost/1011 29632), start Fri
+ 5/3 18:38
[download]

In reply to help need with flexlm by vkknava

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


go ahead... be a heretic
	PerlMonks