Skip to content

Instantly share code, notes, and snippets.

public static void saveData() throws Exception {
FileWriter w = new FileWriter("adressen.txt");
for(Person p : personen) {
p.writeToFile(w);
}
w.close();
}
public static void readData() throws Exception {
BufferedReader r = new BufferedReader(new FileReader("adressen.txt"));
@luelista
luelista / adb-conv-moritzformat.pl
Created February 25, 2011 11:35
Konvertiert Adress-Datensätze zwischen den zwei komischen Datenformat aus dem Info-Unterricht...
#!/usr/bin/perl
use Data::Dumper;
use strict;
my @felder = qw(Name Vorname Strasse Hausnr PLZ Ort);
sub write_to_file { my %data = %{$_[0]}; my @contacts = @{$_[1]};
print $data{$_}, "|" for (@felder);
print $_, "|" for (@contacts);
print "\n";
@luelista
luelista / receiver_info.pl
Created February 19, 2011 21:39
Verwaltet TechniSat TechniStar S1 Receiver über Netzwerk
#!/usr/bin/perl
# receiver_info.pl
# Verwaltet TechniSat TechniStar S1 Receiver über Netzwerk
# Copyright (c) 2011 Max Weller <perl AT max-weller.de>
use strict;
use LWP::UserAgent;
use Getopt::Std;
'-->
'--> mw_fraktal01.vb
#Reference System.Windows.Forms.dll
#Reference System.Data.dll
#Reference System.Drawing.dll
#Reference siaIDEMain.dll
@luelista
luelista / Person.java
Created February 10, 2011 20:45
Unsere wunderbare Hausaufgabe vom 2011-02-07 ...
import java.util.ArrayList;
import java.util.Date;
import java.util.List;
/**
* Class Person
*/
public class Person {
//
@luelista
luelista / Vector.VObject.Serialize.vb
Created January 24, 2011 19:43
Serialisierung der Klasse VObject
Overridable Function Serialize() As String()
Dim data(18) As String
data(1) = Me.GetType.Name
data(2) = bounds.X
data(3) = bounds.Y
data(4) = bounds.Width
data(5) = bounds.Height
data(6) = ZIndex
data(7) = name
data(8) = created
Public Enum VUMLVisibility
[Public]
[Protected]
[Private]
End Enum
Public Class VUMLMethod
Public Name As String
Public IsVoid As Boolean
Public ReturnValue As String
Public Parameters As New List(Of String())
/* Entfernen aller Abstände zwischen den Elementen, die der Browser von sich aus einfügt */
* { margin: 0; padding: 0; }
/* Einheitliche Schriftart einstellen (sans serif), Abstand zwischen Inhalt und Rand des
* Browserfensters ausschalten */
body { font-family: "Segoe UI", Arial, sans-serif; margin: 0; }
/* Kopfzeile formatieren: dunkelgrauer Hintergrund, weiße Schrift, Abstand der Schrift zum Rand */
#header { background: #333; color: #fff; padding: 20px 100px; }
<html><body>
<div id="header">
<h1>Überschrift</h1>
<h2>Hier könnte Ihre Werbung stehen ...<h2>
</div>
<div id="main">
<div id="navigation">
<h4>Inhaltsverzeichnis</h4>
@luelista
luelista / f2c-tab.pl
Created January 2, 2011 13:08
Gibt eine Umrechnungstabelle Fahrenheit->Celsius als Text auf der Standardausgabe oder als PDF-Dokument aus
#!/usr/bin/perl
# f2c-tab.pl
# Gibt eine Umrechnungstabelle Fahrenheit->Celsius als Text auf der Standard-
# ausgabe oder als PDF-Dokument aus
use strict;
use PDF::API2;
if (!(($#ARGV == 0 && $ARGV[0] == "--txt") || ($#ARGV == 1 && $ARGV[0] == "--pdf"))) {