use strict;
use warnings;
use Data::Dumper;

my @arr1 = (1,23,'',45," ",4);

my @arr2 = ("vinoth", " kumar", "  ", 'vin' );

@arr1 = (@arr1,@arr2);

print Dumper \@arr1