Skip site navigation (1)Skip section navigation (2)
Date:      Sun, 2 Apr 1995 12:38:55 -0500
From:      cmf@ins.infonet.net (Carl Fongheiser)
To:        joerg_wunsch@uriah.heep.sax.de (Joerg Wunsch)
Cc:        hackers@FreeBSD.org
Subject:   Re: MBONE interfaces and snazzy install tools.
Message-ID:  <v01510101aba48f660e67@[44.50.32.7]>

next in thread | raw e-mail | index | archive | help
>Perl doesn't know about file flags, unfortunately.  (This would break
>perl's abstraction of system independency.  File flags are a 4.4BSD
>matter.)

Not a big deal, really.  Perl has "syscall", so chflags could be something
like this:

#! /usr/bin/perl

$SYS_chflags = 34;
syscall($SYS_chflags, $ARGV[0], $ARGV[1]+0) && die "$ARGV[0]: $!";

Naturally, you'd want something in here to translate the names of the
flags instead of just using the numeric value.

Carl Fongheiser
cmf@ins.infonet.net





Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?v01510101aba48f660e67>