Group by, Count, and Sorting using Perl Script

The Perl Programming Language

Perl Script to Group by, Count,and Sorting

groupby.pl

die " Usage: $0 \n" unless $ARGV[0];
%arrText=();

$fileName = $ARGV[0];
open(fileData,$fileName);
while(){
  $_ =~ s/(\r|\n)+//gi;
  $arrText{$_} = $arrText{$_} + 1;
}

foreach $key (sort {$arrText{$b} >= $arrText{$a}} keys %arrText){
	print $key." --> ".$arrText{$key}."\n";
}

exit;

Supply Script with Input Text

input_string.txt

mozilla
opera
chrome
firefox
ie
chrome
safari
k-meleon
firefox
chrome

Result of Script with Input Text

C:\Perl\script\text_processor>perl groupby.pl input_string.txt
chrome --> 3
firefox --> 2
mozilla --> 1
ie --> 1
k-meleon --> 1
opera --> 1
safari --> 1

Supply Script with Input Number

input_number.txt

500
20
50
100
500
50
20
10
20
90
10

Result of Script with Input Number

C:\Perl\script\text_processor>perl groupby.pl input_number.txt
20 --> 3
500 --> 2
10 --> 2
50 --> 2
90 --> 1
100 --> 1

Incoming search terms:

• perl group by
• perl grouping
• group by count
• grouping data in perl
• perl groupby sortby count
• perl group and count
• group by in perl
• perl groupby
• perl group by sum
• perl sum group by
• perl grouped join
• perl group data
• perl \group by\
• perl script count input
• group by perl
• groupby in perl
• example perl program for sort the given email address
• sorting in perl script
• oracle group by count(*)
• perl script to sort email addresses
• script group by
• perl sort by group
• perl file group count
• group by perl script
• perl script to group text in a file
• perl while (<data>) { a group
• group by in perl script
• how to sort and count in perl
• perl script group
• perl script group by
• perl sum columns grouped by line
• perl count distinct values in txt file rows group by
• grouping in perl
• implementing group by in perl
• perl sort group
• perl sort count
• perl count group
• perl sorting scripts
• group files based on filename in perl script
• group by sorting
• perl group by count
• perl sort sum report file
• count group by
• perl group count
• perl print sql group by row
• count urls in text data using perl
• sort using perl
• perl group by field
• perl group or sql group
• perl program to sort data pulled from oracle database
• perl grouping data
• group by count(*)
• for (sort <DATA>) { ; perl group
• perl group rows
• perl script that combine emails
• perl script sum columns
• perl script to count columns with data
• perl script sorting
• perl script sorted the input number
• perl script to count email addresses
• perl script to count number of connection in database
• perl script to sort data from database
• perl script to sort data
• perl script to query oracle database and output to text file
• perl script to group the similar elements
• perl oracle group by count example
• perl while () { a group
• perl script to group and total
• perl perl oracle count
• perl script to group and count lines
• perl log report group by date
• perl program to group by
• perl new scripts 2012
• perl program to print numbers between 50-100
• perl program to sort an element
• perl script count by 500
• perl script get count
• perl script count groups
• perl script counting records sql
• perl script for getting rows of interest
• perl script for counting user from dtabases in sql
• perl script for counting data
• perl script distinct examplew
• perl script create group email
• perl script +get count
• perl report grouping
• perl script group data by row
• perl script sort text in file
• perl script sort email addresses
• perl script oracle database aggregate queries
• perl programming
• perl programming how to count records
• perl report groupby
• perl script grouping
• perl script group url
• perl script group on value
• perl script create report sum
• using sort in perl script
• sort result set in perl
• sort post data with perl
• sort post data with perl
• sort join aggregate perl
• sort in perl programming language
• sort email addresses in perl
• sort data in perlscript
• sort by group using perl
• sort and group using perl
• skrip sql group by
• select group by perl
• scripting groupby or
• script to group data
• script sort and group
• sort script perl
• sort text file using perl
• sort with grouping perl
• total by group using perl
• sum script using perl
• sqlplus count(*) perl
• sql sum were group by perl
• SQL statement Perl program sum of numbers
• sql query with aggregates in perl
• sql group by programming language
• sql group by perl script
• sql group by perl
• sql column count in perl script
• sorting examples in perl script
• sorting and unique perl script
• sorting and grouping in perl
• sorting and group by using perl
• script program to group value in text file
• script perl group text
• perl set count ++
• perl sort reports
• perl sort lines by count
• perl sort group up
• perl sort group unique
• perl sort email
• perl sort count unique
• perl sort by groups
• perl sort 100 before 20
• perl searching email and count
• perl scripts on sorting
• perl scripts for implementing group by
• perl scripts for group by
• perl scripting count distinct
• perl script validate with trailer count
• perl sort script
• perl sorting group by
• perl sql group by
• script for group on facebook
• script for group by
• script perl group text
• rowsgroupby perl
• rows to columns in perl script
• reporting using perl and counting
• reporting in perl sorting
• reporting in perl sorting
• r language group by count
• r language group by
• query for group by query in oracle using perl
• query for group by query in oracle using perl
• perl unique group
• perl unique count of columns
• perl script to sort groups numbers
• perl how to count data
• grouping the data in perl
• group data using perl
• group data script
• group count script in c
• group by skript
• group by script
• group by row perl
• group by query in perl
• group by operation in perl scripting
• group by number of rows in perl
• group by no sort
• group by in sql in perl
• group by file field value in perl
• group by en perl
• group by di data report
• group files perl script
• group in perl
• grouping rows using perl
• grouping rows in perl
• grouping record in perl
• grouping in perl
• groupe by in file perl
• groupby in using perl
• groupby in perl and count
• group using perl
• group text through perl script
• group sorting in perl example
• group sorting in perl
• group sort script perl
• group key values in perl
• group in perl programming
• group by count(*) oracle
• group by count sorting using perl
• count records using group by
• count number of elements in column perl script
• count group perl
• count group by perl
• count email group by
• count by grouping using perl
• count and group by perl
• count and group by
• convert perl to c script
• can perl be used for group by sum report
• c count group-by
• and count mail adresse in text file pearl
• aggregating data using perl
• accessing group by data in perl
• count rows for each value perl
• count sorted data perl
• group by count on file perl
• group by in perl
• group by
• getting counts of the grouped columns in perl
• generate sum(column) and group by script using pl/sql
• formatting report in perl grouping
• foreach (string soutput in arrtext) last record
• for (sort ) { ; perl group
• entry counts on line in perl script
• database script for groupings
• counts in columns in perl
• counting unique values from a file in perl
• count(*) group by
• count unique elements using perl
• sort in perl programming language
• grouping the result with count
• perl grouping numbers
• perl group by date
• perl group a file by a column
• perl group
• perl get unique field count
• perl get group key
• perl format grouping number
• perl foreach sum and average group by
• perl data aggregation
• perl counting groupings
• perl counter script sql
• perl count(*) sql
• perl count of elements in group %
• perl count number in colomn
• perl count logs group
• perl group by rows directory sum range
• perl group by sort
• perl grouping data in memory
• perl grouping and report
• perl group text file
• perl group text
• perl group sum data
• perl group sort
• perl group scripts
• perl group records by
• perl group keys
• perl group data by date
• perl group by\
• perl group by value or reference
• perl group by sum script
• perl group by sum example
• perl count email address
• perl count average logs group by
• how to send email to group in perl script
• how to php script counting the group by values
• how to group the data in a file using perl script
• how to group lines in perl
• how to group data in perl
• how to group columns of data in perl and add columns of data
• how to group by resultset in perl
• how to group a text in perl script
• how to count the value using perl script
• how to count the text in perl script
• how to count the data in perl
• how to count by group Perl
• how to count by group and prnt Perl
• how to aggregate data in file using perl script
• how to send email to group using perl script
• how to sort in perl script
• perl count
• perl code to group by
• perl code for grouping
• perl code for combining counts
• perl aggregation and count
• perl grouping data in memory
• perl
• oracle group by number of elements in every group
• oracle count(*)
• langage perl chrome mozilla opera
• implementing group by in files using perl
• how to sort users with tickets count using perl
• how to sort the query output using perl
• how to sort the elements in a file using perl scr ipt
• how i will column count using perls