Help for this page
@ARGV = $_, push @data, $_, <> for @{[@ARGV]};
@ARGV = $_, push @data, $_, <> for map $_, @ARGV;