#!/usr/bin/perl

# try to view latest debuild/sbuild log

use strict;
use warnings;

chomp( my $version = `dpkg-parsechangelog -SVersion` );
chomp( my $package = `dpkg-parsechangelog -SSource`  );
chomp( my $arch    = `dpkg --print-architecture`     );

system "less ../${package}_${version}_$arch.build";