Question

Lets say i have generated some random alphabets and random numbers

A 1
Z 2
C 3
L 2
E 4

and similarly another set

1 K
4 I
2 P
5 R
6 S
7 U

Now we can find 2 is linked to Z and L in the first case and similarly 2 is linked to P in the second set
from this we can say Z and L are connected to P
so intially i have generated the first two steps. I am a little confused how to proceed with rest?

Answer 1

The Graph module can help. In fact, concepts from Graph Theory are the right way to think about these sorts of problems instead of thrashing around with hashes and arrays trying to re-solve already solved problems.

#!/usr/bin/env perl

use strict; use warnings;
use Graph::Directed;
use Set::CrossProduct;

my $g = Graph::Directed->new;

my %first = qw(A 1 Z 2 C 3 L 2 E 4);
my %second = qw(1 K 4 I 2 P 5 R 6 S 7 U);

for my $h (\ (%first, %second) ) {
    $g->add_edge($_, $h->{$_}) for keys %$h;
}

print "All weakly connected components\n";

for my $wcc ( $g->weakly_connected_components ) {
    print "[@$wcc]\n";
}

my $it = Set::CrossProduct->new([ [keys %first], [values %second]]);

print "Connectedness tests\n";

while (my $case = $it->get) {
    my $is_connected = $g->same_weakly_connected_components(@$case);
    printf(
        "%s are %s in the same weakly connected component\n",
        "[@$case]", $is_connected ? '' : 'not'
    );
}

Output

All weakly connected components

[R 5]
[E 4 I]
[K 1 A]
[2 Z L P]
[S 6]
[7 U]
[C 3]

Connectedness tests

[Z S] are not in the same weakly connected component
[Z I] are not in the same weakly connected component
[Z K] are not in the same weakly connected component
[Z U] are not in the same weakly connected component
[Z P] are  in the same weakly connected component
[Z R] are not in the same weakly connected component
[A S] are not in the same weakly connected component
[A I] are not in the same weakly connected component
[A K] are  in the same weakly connected component
[A U] are not in the same weakly connected component
[A P] are not in the same weakly connected component
[A R] are not in the same weakly connected component
[C S] are not in the same weakly connected component
[C I] are not in the same weakly connected component
[C K] are not in the same weakly connected component
[C U] are not in the same weakly connected component
[C P] are not in the same weakly connected component
[C R] are not in the same weakly connected component
[E S] are not in the same weakly connected component
[E I] are  in the same weakly connected component
[E K] are not in the same weakly connected component
[E U] are not in the same weakly connected component
[E P] are not in the same weakly connected component
[E R] are not in the same weakly connected component
[L S] are not in the same weakly connected component
[L I] are not in the same weakly connected component
[L K] are not in the same weakly connected component
[L U] are not in the same weakly connected component
[L P] are  in the same weakly connected component
[L R] are not in the same weakly connected component