I have stored values in 5 text files. The values in each text file should be considered as an array. I am trying to write a perl program, **to read and print** the common elements in these 5 arrays.

For Instance

```
@a1=(1,7,4,5); 

@a2=(1,9,4,5); 

@a3=qw(1,6,4,5 ); 

@a4=qw(1 2 4 5 ); 

@a5=qw(1 2 4 5 ); 

```

I expect to print

```
1 4 5 

```