#!/usr/bin/perl

# $FreeBSD: stable/2.1/gnu/usr.bin/perl/eg/ADB 50952 1999-09-05 11:54:50Z peter $

# This script is only useful when used in your crash directory.

$num = shift;
exec 'adb', '-k', "vmunix.$num", "vmcore.$num";
