AnaTofuZ

#!/bin/sh

#引数チェック
if [ $# -eq 3 ] ; then
	filename=$1
	pagetitile=$2
	reportnumber=$3

else
	echo "Usage: prompt > $0 filename title reportnumber"

AnaTofuZ

#!/usr/bin/env perl

use strict;
use warnings;
use Data::Dumper;
use utf8;
binmode STDOUT,":utf8";

my $alice = {
    name        => 'Alice',

AnaTofuZ

#OSmkdir{{{
osmkdir()
{
    if [ $# -eq 0 ]; then
        echo "missing arguments " 1>&2
        exit 1
    fi

#ここのSSHを変更してください
SSH=ssh://yomitan//home/hg/y15/e155730/OS/

AnaTofuZ

### Keybase proof

I hereby claim:

  * I am anatofuz on github.
  * I am anatofuz (https://keybase.io/anatofuz) on keybase.
  * I have a public key ASCUFSGTiUxBUZFHjP1aoEdppUbRXxdOlEtW9jc3wFwPlwo

To claim this, I am signing this object:

AnaTofuZ

#!/usr/bin/env perl

sub hoge {
    print $foo{"hoge"};
}

$foo{"hoge"} = "inu";

do hoge();

AnaTofuZ

#define __environment _CbC_environment
#define __return _CbC_return

#include "stdio.h"
#include "string.h"
#include <stdlib.h>

__code fizzbuzz(int,int,__code(),void*);
__code say2(int,int,char*,__code(),void*);
__code fizz(int,int,__code(),void*);

AnaTofuZ

概要

OSの授業の予習会でやった内容を載せていきます。主に昨年の授業内容を参照しているので今年度の内容とは内容が異なる可能性があります。
OSの授業ページ

INDEX

• Day1(9/21)
  • やったこと
• Phase0. 環境構築編

AnaTofuZ

extern int printf(const char *,...);

int *f() {
    int i = 6;
    printf("in f %d\n", i);
    printf("in f %p\n", &i);
    return &i;
}
 
int *g() {

AnaTofuZ

use strict;
use warnings;

while (my $line = <DATA>){
    if ($line =~ /(<h2(.*?)>(.*?)<\/h2>)|(<p pno=(.*?)>(.*?)<\/p>)/){
        print "$1\n";
    }
}

__DATA__

AnaTofuZ

FROM anatofuz/perl-1.0:latest

COPY ./perl_1.pl /
ENTRYPOINT ["/usr/local/bin/perl","/perl_1.pl"]