#!/usr/bin/perl 
    
# Modules used 
use strict; 
use warnings; 
    


my $cmd = "git log --format=format:%H --all";
my @output = `$cmd`;    
chomp @output;

foreach my $line (@output)
{
    print "$line";
}

