No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
|
[CODE]#!/usr/local/bin/perl $file = 'C:\Users\asdds\test1.log'; open(INFO, $file); @lines = <INFO>; foreach $data (@lines) { chomp($data); (@x,@y)=split( ,$data); print "@x[0]\n"; print "@y[0]\n"; } $length_ice = length (@x[0]); print "Content-type: text/html\n\n"; print "<html><head>\n"; print "<title>Server Log File Information</title>\n"; print "</head>\n"; print "<body> Length of Total number of entries: $length_ice\n"; close(INFO);[/CODE] i want to …
|
|
|
I write some coding i want to get 2 output like Example (1) of object Employee: Id# Name : Age: Sex: etc. Example (2) of object Employee: Id# Name : Age: Sex: etc. i just dont want a long code.. …
|